配列・・

＠配列

• push
• pop
• shift
• unshift

について学習

#!/usr/bin/perl

@member = ("イチロー","ジロー","サブロー","シロー");
push(@member,"ゴロー");
print @member;①

shift(@member);
$no_member = shift(@member);

print "\n$no_member\n";②
print @member;③

ってやったら
①イチロージローサブローシローゴロー
と表示されるはずで、ちゃんと表示された。

②ではカットした先頭が入るはずだから
イチロー
と表示されるかと思ったら
「ジロー」

③ではshiftで先頭カットだから
ジローサブローシローゴロー
と表示されると思ったら
「サブローシローゴロー」

なぜー（´･ω･`）w

****************************************
わかった！

#!/usr/bin/perl

@member = ("イチロー","ジロー","サブロー","シロー");
push(@member,"ゴロー");
print @member;①

shift(@member);★
$no_member = shift(@member);

print "\n$no_member\n";②
print @member;③

って2回打ってたからか！！
本の見方を間違ってただけでした笑
★のところがいらなかったですね！
あーお騒がせ