BAZ
#### $text = </g; $text =~s/\n{1,1}//g; $text =~ s/\n/>\n/g; print $text; #### FOO BAR BAZ
## $text = </g; $text =~s/\n{1,1}//g; $text =~ s/\n/>\n/g; print $text; ##
## FOO BAR BAZ