Select Code to Download

while(<STDIN>) { chomp; $s.=$_; print "$s\n"; }

while(<STDIN>) { chomp; last unless length; $s.=$_; print "$s\n"; }