Help for this page
#!/usr/bin/perl -d:ptkdb
#!/usr/bin/perl -d:ptkdb ... print "Count $i\n"; } print "</PRE>\n";