Select Code to Download

#!/usr/bin/perl -w
use strict;
...
      print $_;
   }
}

# testing coruscate
...
ok - "line1\nline2"
ok - "\nline1\nline2\n"
ok - "line1\nline2\n\n\n"