Select Code to Download

[sstone@granite sstone]$ perl -le 'print 1; goto "FOO"; print 2'
1
Can't find label FOO at -e line 1.
[sstone@granite sstone]$

------------
:Wq
Not an editor command: Wq