Help for this page
Select Code to Download
Select
or
download this
$count = 2; foreach (0..2) {} continue {print $_,"\n" if $count--}