in reply to splitting on new-line characters
my $str = <<TXT; foo bar baz TXT print "[$_]" for split /\n/, $str; __output__ [foo][bar][baz] [download]
_________broquaint