Changes

[http://wso.williams.edu/facebook/view?unix=/jmh1 $ perl -e "length q local and print chr oct ord q open do and print chr ord qw q uc q and print chr ord qw q lc q and print chr ord q tie lt and print chr ord q map m and print chr ord qw q ne q and print chr ord q q q and print chr ord uc q chr lc and print chr ord q ref or and print chr ord q msgctl m and print chr ord qw q s q"]