↑　そのpushの中の$_はどんな働きをするの？

push @array, while <STDIN>;
chomp @array;

でも、OKだったけど。
>>605のソースを走らせても$_の中に何も文字列は入っていなかった。