Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
use strict;
...
    }
}   
print "\n[END]\n";
  2. or download this
    #!/usr/bin/perl -w
use strict;
...
    }
}
print "  </tr>\n\n</table>\n";
  3. or download this
        } elsif ($rows == $row_count) {
        $row_count = 0;
        print "    <td width=\"100%\">\n";
        print "        number: [$i]\n";
        print "    </td>\n\n  </tr>\n\n";