http://www.perlmonks.org?node_id=1011362


in reply to Re: $/ usage
in thread $/ usage

"in its original form" - i was expecting to see something like this: server1 ip server2 ip server3 ip etc..
I was going to do another pattern match on the string $text after getting it in the string.

perl -e 'undef $/; my $text=<>; 1 while $text =~ s/\b(\w+\d+)\s*\1\b/$ +1/gi; pring $text; $/="\n";' list

Replies are listed 'Best First'.
Re^3: $/ usage
by graff (Chancellor) on Jan 02, 2013 at 22:44 UTC
    To get all the lines from a slurped input file to show up as a single line on output, you want something like this:
    perl -e 'undef $/; $_=<>; tr/\n/ /; s/ $/\n/; print' list
    Or you could just use unix/linux commands that do the same thing:
    xargs echo -n < list
    (If you want a clean line break at the end of that output, add  && echo at the end.)