Help for this page

Select Code to Download

Select or download this

#!/bin/perl -w
my $line = 0
...
}

print $line, "\n";

Select or download this

#!/bin/perl -w
my $line = 0
...
}

print $line, "\n";