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