Help for this page
foreach (@array, 1) { #push @array,'a';#replace following statement with this one ... __END__ a 1
push @array,'a'; @array = (@array,'a');
1 while 1