Select Code to Download

# this works
#!/usr/bin/perl -w   
...
print ++$a ."\n";
print ++$a ."\n";

perl -e '$char = "a"; print $char++, $/ for 1..20'
perl -e '$char = "a0"; print $char++, $/ for 1..20'
perl -e '$char = "a0a"; print $char++, $/ for 1..20'