Help for this page

Select Code to Download

Select or download this

my $n = 0;
foreach (@array) {
...
    print "." if !($n++ % 3);
}
print "\n";