>print join( ',', map { s/[\r\n]+//g; $_ } @row ), "\n";
bingo!I wasn't doing the ;$_ thingy in map. Putting the $_ at the end of the block isn't very intuitive, but it's "like" a 'return $_' call in a function. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
