Select Code to Download

perl -ne'chomp; $x=$_; print "x=$x, -x=",-$x,"\n";'

perl -ne'chomp; $x=0+$_; print "x=$x, -x=",-$x,"\n";'