Oh, and here is a one liner that will change , to pipes or in fact do any sort or search and replace s/find/replace/g on a whole file:

perl -pi.bak -e 's/,/|/g' <file>
[download]

This does an inplace edit of <file> and writes a copy of the original to file.bak. You need to use " instead of ' on Win32.

perl -pi.bak -e "s/,/|/g" <file>
[download]

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print