Help for this page
my $i; my @ar = 0 .. 10; ...
#!/usr/bin/perl use strict; ... if ( $ctr == $_[0]) { $ctr = 0 } else { no warnings; next } } }