In "Effective Perl Programming" (i read this from back to front now because I have read it so many times and keep hitting the same thing) Randal Schwartz offered the above as a way to take a file and join lines together in pairs.
do in a regexp?
2: if data is a filehande and this is a one-liner, how does data get input from a file with "\n"=separated values?