Select Code to Download

echo stuff | perl -ne '$x=shift; print "x=$x\n"' - myarg

cat stuff | perl -ne '$x=shift; print "x=$x\n"; print "<>=$_"' - myarg
+ myarg2 stuff

x=myarg
<>=foo
...
<>=foo
x=
<>=bar