genascii.pl to HTML.

index -|- end

Generated: Tue Feb 2 17:54:39 2010 from genascii.pl 2007/02/20 190.

#!/Perl
# genascii.pl - 2007.02.20
my ($i);
for ($i = 32; $i < 127; $i++) {
   print "\n" if ((chr($i) eq 'A')||(chr($i) eq 'a'));
   print chr($i);
}
print "\n";
# end genascii.pl

index -|- top

checked by tidy  Valid HTML 4.01 Transitional