Re^2: sed awk to perl help

When I tried this example, I had some problems with it, and I think there are 2 issues:

1) the order of the arguments (I needed to order them as perl -paipage.txt -F"[;:]" -e to avoid the error

Can't open my $out=shift @F;print "<a href=mysite.net/$out>$out</a>\n"
+;: No such file or directory.
[download]

and 2), the script didn't seem to handle multiple matches on the same line (that I think the original did)

'map { print "<a href=mysite.net/$_>$_</a>\n" } @F'

then I realized that this still didn't handle the way that awk deals with white space, so the one line got longer when I added split(" ",$_)

perl -F"[:;]" -lane 'map { ($_)=split " ",$_; print "<a href=mysite.ne
+t/$_ >$_</a>" } @F'
[download]

given test data like

a b ; d e : f g : ; x
[download]

Comment on Re^2: sed awk to perl help Select or Download Code

Replies are listed 'Best First'.
Re^3: sed awk to perl help by Moron (Curate) on Apr 17, 2007 at 21:29 UTC
the -F specifies the split pattern, so instead of also splitting by ' ', just change the -F argument to `-F"[:;\s]"` __________________________________________________________________________________ ^M Free your mind! Key to hats: ^I=white ^B=black ^P=yellow ^E=red ^C=green ^M=blue - see Moron's scratchpad for fuller explanation.	[reply] [d/l]
Re^4: sed awk to perl help by dcd (Scribe) on Apr 18, 2007 at 01:50 UTC
but splitting on spaces too early will change the results from the initial results, plus you won't get the special awk behaviour that you get when you split on <code>' '<\code>	[reply]
Re^5: sed awk to perl help by Moron (Curate) on Apr 18, 2007 at 11:37 UTC
ok I see what you are doing. I'd have used a regexp without split as many others are suggesting, e.g.: `perl -F"[:;]" -lane ' print "<a href=mysite.net/$_ >$_</a>" for map { /^\s(\S+)/; $_ = $1 } @F; '` [download] Because in the awk you only wanted $1 so don't need to run the regexp more than once per line (line after the -F implied split that is). __________________________________________________________________________________ ^M Free your mind!* Key to hats: ^I=white ^B=black ^P=yellow ^E=red ^C=green ^M=blue - see Moron's scratchpad for fuller explanation.	[reply] [d/l]