Help for this page
#!/usr/bin/env perl use strict; ... $col = $col + 1; } }
#!/usr/bin/env perl use strict; ... print $num % 8 ? "\t" : "\n"; $num = $num + 1; }
use strict; use warnings; for (my $x = 1; $x <= 64; $x += 1) { print $x, $x % 8 ? "\t" : "\n"; }
perl -e 'print $_, $_ % 8 ? "\t" : "\n" for 1..64;'
www.com | www.net | www.org
No recent polls found