On Aug 25, 2006, at 3:30 PM, John W. Krahn wrote:
This is a "feature" :-) This thread may help explain:
http://groups.google.com/group/perl.perl5.porters/browse_frm/thread/
2eca0c52a1b299c4/f655bddfdbf2d0d6?
lnk=st&q=&rnum=1&hl=en#f655bddfdbf2d0d6
One way to do what you want:
$ echo 'a: b' | perl -F'/:\040/' -lane'print join "--", @F'
a--b
Thanks, John, that worked for me, too. A less elegant solution I
found was to prefilter my input via sed:
$ echo 'a: b' |
sed -e 's/: /:/g' |
perl -F':' -lane 'print join("--", @F)'
a--b
I like yours better. Again, thanks.
Regards,
- Robert
http://www.cwelug.org/downloads
Help others get OpenSource software. Distribute FLOSS
for Windows, Linux, *BSD, and MacOS X with BitTorrent
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
