From: throopw@sheol.org (Wayne Throop)
Subject: Re: A very simple question on SED or AWK for a GURU, possibly a lisp script or emacs batch processing of many files
Date: Tue, 14 Jan 2003 22:10:59 GMT [thread overview]
Message-ID: <1042582259@sheol.org> (raw)
In-Reply-To: b00bb831.0301140042.4dff4b4e@posting.google.com
: gnuist006@hotmail.com (gnuist006)
: Even though the problem posed in this thread is still
:
: *** UNSOLVED ***
:
: let me extend my gratitude to Mr Christofer and Friedrich for their
: kind attempts to answer this. I hope for some more help tonight.
perl -pe 's-\b(label="[^"]*")- ((($x=$1) =~ s./._.g),$x) -ge'
: I can write a bash wrapper loop but what I do not know here is how to
: implement the core logic of replacing an indefinite number of
: forward-slashes within a pattern of interest.
s/\//_/g
: I also want to use bash/sed/awk instead of perl.
Why?
Oh, well. You'd think this bit of awk-wardness would work
by analogy with the perl above `
awk '{gsub("label=\"[^\"]*\"", gensub("\/","_","g","&"));print}'
but it doesn't. Hrm. Maybe
awk '{
s=$0;
m=match(s,"label=\"[^\"]*\"");
if(m){
pre =substr(s,1,RSTART-1);
inf =substr(s,RSTART,RLENGTH);
post=substr(s,RSTART+RLENGTH);
gsub("/","_",inf);
s= pre inf post;
}
print s;
}'
Yeah, that works, at least on the cases I tested. The perl is a tiny
bit cleaner, though; the perl version handles multiple labels on a line,
and the \b ensures the "label" isn't part of a larger word. Both of
which are a bit tricky to do in awk. Doable, just not as easy.
Plus which, the perl looks more like line noise,
which is cool, and promotes job security.
Wayne Throop throopw@sheol.org http://sheol.org/throopw
next prev parent reply other threads:[~2003-01-14 22:10 UTC|newest]
Thread overview: 10+ messages / expand[flat|nested] mbox.gz Atom feed top
2003-01-14 0:03 A very simple question on SED or AWK for a GURU, possibly a lisp script or emacs batch processing of many files gnuist006
2003-01-14 3:46 ` Christopher J. White
2003-01-14 7:13 ` Friedrich Dominicus
2003-01-14 8:42 ` gnuist006
2003-01-14 10:23 ` Friedrich Dominicus
2003-01-14 22:10 ` Wayne Throop [this message]
2003-01-14 18:18 ` ericjb
2003-01-14 19:34 ` Stefan Monnier <foo@acm.com>
2003-01-14 22:54 ` Alan Mackenzie
2003-01-14 23:19 ` Kaz Kylheku
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=1042582259@sheol.org \
--to=throopw@sheol.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).