#!/usr/bin/perl -00n s/\n/\$/g; print "<$_>\n"; __END__ Prints: