topic Re: scripting help required in Operating System - HP-UX

scripting help required

george_57 — Sun, 15 Sep 2002 04:33:00 GMT

Hi Experts,
Could somebody help me with a script that im trying to make. The idea is just reformating data....Example data:
############################
2
1.1 2.2 3.1 4.1 5.1 6.2 7.1
9.1 9.2 9.6 9.8 9.8 8.2 3.4
1.1 2.2 3.1 4.1 5.1 6.2 7.1
1
1.1 2.2 3.1 4.1 5.1 6.2 7.1
9.1 9.2 9.6 9.8 9.8 8.2 3.4
1.1 2.2 3.1 4.1 5.1 6.2 7.1
5
1.1 2.2 3.1 4.1 5.1 6.2 7.1
9.1 9.2 9.6 9.8 9.8 8.2 3.4
1.1 2.2 3.1 4.1 5.1 6.2 7.1
############################

The script should be able to go through the file and check for all lines containing 1 field and make all the associated data in to one row.
for example in this case for the first part:

2 1.1 2.2 3.1 4.1 5.1 6.2 1.1
9.1 9.2 9.6 9.8 9.8 8.2 3.4 1.1 2.2 3.1 4.1 5.1 6.2 7.1

Thanks in advance
Soji

Re: scripting help required

george_57 — Sun, 15 Sep 2002 05:55:17 GMT

2 1.1 2.2 3.1 4.1 5.1 6.2 7.1 9.1 9.2 9.6 9.8 9.8 8.2 3.4 1.1 2.2 3.1 4.1 5.1 6.2 7.1

Re: scripting help required

Patrick Chim — Sun, 15 Sep 2002 07:16:15 GMT

Hi,

Here is a quick script for your purpose,

=====Begin
#!/bin/ksh

cat | grep -v "#" | while read LINE
do
if [ "$LINE" = "`echo $LINE | awk '{print $1}'`" ]
then
echo $NEWLINE
NEWLINE=$LINE
else
NEWLINE=$NEWLINE" "$LINE
fi
done
echo $NEWLINE

======End

Regards,
Patrick

Re: scripting help required

Leif Halvarsson_2 — Sun, 15 Sep 2002 14:17:52 GMT

Hi

Perhaps this is what you need. Call it for example txt1 and use it "txt1

#!/usr/bin/sh
txt3()
{
case "$#" in
0)
echo $line ;;
1)
if [ -n "$line" ]
then
echo $line
fi
line=$1" " ;;
*)
line=${line}$@ ;;
esac
}

while read a
do
txt3 $a
done
txt3

Re: scripting help required

Leif Halvarsson_2 — Sun, 15 Sep 2002 16:29:25 GMT

Hi

Some modifications (better handling of spaces).

#!/usr/bin/sh
txt3()
{
case "$#" in
0)
echo $line ;;
1)
if [ -n "$line" ]
then
echo $line
fi
line=$1 ;;
*)
for b in $@
do
line=${line}" "$b
done
esac
}

while read a
do
txt3 $a
done
txt3

Re: scripting help required

Rodney Hills — Mon, 16 Sep 2002 02:33:37 GMT

Soji,

If you don't mind using perl, here is a short one liner-

perl -ne 'chomp; if (/^\d+$/) { print "\n",$a if $a; $a=$_; } else { $a.= " " . $_;
} print $a;' inputfile.txt

HTH

-- Rod Hills

Re: scripting help required

RAC_1 — Mon, 16 Sep 2002 02:46:33 GMT

cat your_file|grep -v "#"|tr "\n" " "

Re: scripting help required

Robin Wakefield — Mon, 16 Sep 2002 07:21:46 GMT

Hi Soji

...using awk:

awk '{if (NF==1 && NR >1)printf("\n",$0)}{printf("%s",$0)}END{print}' file

Rgds, Robin

Re: scripting help required

john korterman — Tue, 17 Sep 2002 07:07:48 GMT

Hi George,

maybe I read too much into your question, but you could try running the attached script using your input file as par1.

regards,
John K,