Select Code to Download

#!/usr/bin/perl
$_ = <STDIN>;
chomp;
print "foo => '$_'";

- print $in q|some json|;
+ print $in "some json\n";