Select Code to Download

#!/usr/local/bin/perl
$c = "c";
...
$c+=0;
print $c, " from numeric operation\n";
print ++$c, " incremented after numeric assignment";