topic Re: sed command help!!! in Operating System - HP-UX

sed command help!!!

Cesar Fernandes — Mon, 15 Mar 2004 11:35:57 GMT

I am trying to perform an action and a subset of data in a line. I got it add what I wanted but it also added it before the day in the date.

Why does this command work?

sed 's/$TAPES\:.*$ $FILES\:.*$/{s/ 0/
0//}g'

Data Before:
DATE: MAR 03 2004 CLASS: UX_PROD TAPES: 030043 030260 030233 030237 FILES: /oracle* /oracle1* /oracle2*

DATE: MAR 04 2004 CLASS: UX_PROD_OTHER TAPES: 030127 FILES: /sybdump

What I am trying to do DATA AFTER:

DATE: MAR 03 2004 CLASS: UX_PROD TAPES:
030043
030260
030233
030237 FILES: /oracle* /oracle1* /oracle2*

DATE: MAR 04 2004 CLASS: UX_PROD_OTHER TAPES:
030127 FILES: /sybdump

Re: sed command help!!!

Jean-Luc Oudart — Mon, 15 Mar 2004 12:20:26 GMT

Can we try awk ?

#!/bin/sh

awk '
{
flg=0;
n1=split($0,tab);
for(i=1; i <= n1;i++) {
if(tab[i]=="FILES:") flg=0;
if(flg==1) printf("
");
printf("%s ",tab[i]);
if(tab[i]=="TAPES:") flg=1;
}
printf("\n");
}'

Regards,
Jean-Luc

Re: sed command help!!!

David Burgess — Mon, 15 Mar 2004 12:26:12 GMT

Hi,

This uses awk rather than sed, but gets the result you wanted.

I've created 2 files. The input file is test.in and contains the following :-

DATE: MAR 03 2004 CLASS: UX_PROD TAPES: 030043 030260 030233 030237 FILES:
/oracle* /oracle1* /oracle2*

DATE: MAR 04 2004 CLASS: UX_PROD_OTHER TAPES: 030127 FILES: /sybdump

test.ksh contains :-

cat ./test.in | awk -F" " ' \
BEGIN {}
/UX_PROD TAPES/ {print $1" "$2" "$3" "$4" "$5" "$6" "$7"
"$8"
"$9"

"$10"
"$11" "$12" "$13" "$14" "$15}
/UX_PROD_OTHER TAPES/ {print $1" "$2" "$3" "$4" "$5" "$6" "$7"
"$8" "$9"
"$10" "$11" "$12" "$13" "$14" "$15}'

Run ksh ./test.ksh and the output is as you wanted :-

DATE: MAR 03 2004 CLASS: UX_PROD TAPES:
030043
030260
030233
030237 FILES: /oracle* /oracle1* /oracle2*
DATE: MAR 04 2004 CLASS: UX_PROD_OTHER TAPES:
030127 FILES: /sybdump

Regards,

Dave.

Re: sed command help!!!

Mark Grant — Mon, 15 Mar 2004 12:30:24 GMT

Or some nasty "perl" that Merijn could do in about nine bytes.

perl -ne '($s,$m,$e)=(/(.+TAPES:)(.+)(FILES.+)/);$m=~s/ /
/g;print "${s}${m}${e}\n"'

Re: sed command help!!!

Cesar Fernandes — Mon, 15 Mar 2004 14:19:48 GMT

Hey Jean-Luc,

Your awk works great!! But how can I make it so the
is after the numbers not before as I showed incorrectly.

Re: sed command help!!!

Cesar Fernandes — Mon, 15 Mar 2004 14:44:11 GMT

Hey Jean-Luc,

Never mind I got it.

awk '
{
flg=0;
n1=split($0,tab);
for(i=1; i <= n1;i++) {
if(tab[i]=="FILES:") flg=0;
if(flg==2) printf("
");
if(flg==1) flg=2;
printf("%s ",tab[i]);
if(tab[i]=="TAPES:") flg=1;
}
printf("\n");
}' $INPUT.tmp3 > $INPUT.tmp2

THANKS ALOT!!!

And Thanks to all who answered.