Select Code to Download

$ perl -le '$foo = "foo\r\n"; $/ = "\r\n"; print chomp $foo; print len
+gth $foo'
2
3