Select Code to Download

=   is
==  equals
...
--  decrease
++  increase
#   pound, comment, remark (not "hash" because of % :)

while (<>) {
   s/\r/blah/;
   print $_ || "Empty\n";
}

while diamond,
s slash carriage return slash blah slash, stop, 
print default, short or,
double quote titlecase empty, newline, double quote, stop.
end of while.