配列に値を追加する(push,unshift) - Perl

この記事は2007年05月26日に書かれた物です

配列の先頭、または末尾から値を追加するにはpush、unshiftを用いれば良い。 先頭への追加はunshift、最後に追加するのはpushを用いる。

サンプル

;#
;#配列へ値を追加する
;#
 
use strict;
 
#--------------------------#
#       配列を初期化       #
#--------------------------#
my @array = (1..5);
 
#--------------------------#
#       値を追加する       #
#--------------------------#
#-- 先頭に追加する --#
unshift(@array, 100);
 
#-- 末尾に追加する --#
push(@array, 500);
 
 
#--------------------------#
#      実行後の配列は?    #
#--------------------------#
print "$_\n" foreach(@array);

実行結果

100
1
2
3
4
5
500

関連書籍

failed to fetch data: unkown error

Joseph N. Hall, Joshua…
ISBN 4798139815
¥ 4,104

コメント

コメントを入力. Wiki文法が有効です:
J᠎ K J᠎ Z​ I