読者です 読者をやめる 読者になる 読者になる

at kaneshin

Free space for me.

配列めも

perl - pushとか

@foo = (1,2,3);
push @foo, 10; # @foo = (1,2,3,10);
$bar = pop @foo; # $bar = 10;
unshift @foo, 0; # @foo = (0,1,2,3);
$bar = shift @foo; # $bar = 0;