topic Re: text processing in Operating System - HP-UX

text processing

T G Manikandan — Fri, 30 Jul 2004 06:12:38 GMT

File 1:

NWDEMSGTYPESEQ
NWDEMSGCTRYTIME

File 2:
NWDE-MSG-TYPE-SEQ
NWDE-MSG-CTRY-TIME

Now I need a output like

echo else if (name.equalsIgnoreCase(""))
{
setNWDEMSGTYPESEQ(strBuff);
}

I would like to loop to get a output somewhat like

echo else if (name.equalsIgnoreCase("NWDE-MSG-TYPE-SEQ"))
{
set(strBuff);
}

quick 10 points!!

Re: text processing

T G Manikandan — Fri, 30 Jul 2004 06:37:12 GMT

like

echo else if (name.equalsIgnoreCase("NWDE-MSG-TYPE-SEQ"))
{
setNWDEMSGTYPESEQ(strBuff);
}

Re: text processing

Muthukumar_5 — Fri, 30 Jul 2004 06:50:14 GMT

We can print it with echo or printf on command line to do simply ?! as like

echo "echo else if(name.equalsIgnoreCase(\"$(tail -1 file2)\"))\n{\nset$(head -1 file1)(strBuff);\n}"

printf "echo else if(name.equalsIgnoreCase(\"$(tail -1 file2)\"))\n{\nset$(head -1 file1)(strBuff);\n}"

Delemit " character with \

Re: text processing

T G Manikandan — Fri, 30 Jul 2004 09:13:54 GMT

I have file with 10000 rows similarly

Re: text processing

H.Merijn Brand (procura — Fri, 30 Jul 2004 09:18:52 GMT

I don't recognize that scripting language. Is it Python?

If you just have plain text files, and rephrase the question, you might have more luck here with people knowing to do what you want in awk/sed/perl/sh

Enjoy, Have FUN! H.Merijn [ who honoustly has no idea what to answer to the original question ]

Re: text processing

Fred Ruffet — Fri, 30 Jul 2004 09:37:14 GMT

Try this (if I understand the question, it might work) :

$>perl
$fd1="file1";
$fd2="file2";
open fd1;
open fd2;
while () {
$File1Line=$_;
;
$File2Line=$_;
$File1Line=~ s/\n//g;
$File2Line=~ s/\n//g;
print "echo else if (name.equalsIgnoreCase(\"$File2Line\"))\n";
print "{\n";
print "set$File1Line(strBuff);\n";
print "}\n";
}

It outputs this from your original files :

echo else if (name.equalsIgnoreCase("NWDEMSGTYPESEQ"))
{
setNWDEMSGTYPESEQ(strBuff);
}
echo else if (name.equalsIgnoreCase("NWDEMSGCTRYTIME"))
{
setNWDEMSGCTRYTIME(strBuff);
}

Regards,

Fred

Re: text processing

Muthukumar_5 — Fri, 30 Jul 2004 09:54:34 GMT

I have confused of multiple output's of set and setNWDEMSGTYPESEQ.

It is as simple as,

awk '{ print "else if(name.equalsIgnoreCase(\""$0"))\n{\nsetNWDEMSGTYPESEQ(strBuff);" }'

Re: text processing

Muthukumar_5 — Fri, 30 Jul 2004 10:26:09 GMT

I missed out } at the end,

modified as,

awk '{ print "else if(name.equalsIgnoreCase(\""$0"))\n{\nsetNWDEMSGTYPESEQ(strBuff);\n}" }' file1

Output:
=======
else if(name.equalsIgnoreCase("NWDEMSGTYPESEQ))
{
setNWDEMSGTYPESEQ(strBuff);
}
else if(name.equalsIgnoreCase("NWDEMSGCTRYTIME))
{
setNWDEMSGTYPESEQ(strBuff);
}

Re: text processing

Fred Ruffet — Fri, 30 Jul 2004 11:06:02 GMT

Output for my script is not good cause I put the same content in the 2 files. Try it anyway :)

Regards,

Fred

Re: text processing

Rodney Hills — Fri, 30 Jul 2004 11:34:07 GMT

Here is a one liner. By using "pr" to merge the 2 files and "perl" to reformat, I think this is what you are looking for-

pr -mt file1 file2 | perl -n -e 'chomp; ($a,$b)=split "\\s+"; print "echo else if (name.equalsIgnoreCase(\"${b}\"))\n{\nset$
{a}(strBuff);\n}\n"'

HTH

-- Rod Hills

Re: text processing

Muthukumar_5 — Fri, 30 Jul 2004 12:38:18 GMT

Another try with perl and sed as,

Perl:
perl -p -e 's/[^.]/else if(name.equalsIgnoreCase(\"/;s/$/\"))\n{\nsetNWDEMSGTYPESEQ(strBuff);\n}/' file*

To put the modified contents in the same file then,
perl -p -i -e 's/[^.]/else if(name.equalsIgnoreCase(\"/;s/$/\"))\n{\nsetNWDEMSGTYPESEQ(strBuff);\n}/' file*

Using sed:
sed -e 's/[^.]/else if(name.equalsIgnoreCase(\"/;s/$/\"))\
{\
setNWDEMSGTYPESEQ(strBuff);\
}/p' file*

Regards
Muthu

Re: text processing

Hein van den Heuvel — Sun, 01 Aug 2004 20:31:15 GMT

So you are trying to generate a long shell script driven by two list of words that are garantueed to remain in sync?
If the first file always a simple transformation of the second by removing all dashes? In that case I'd just use the second file with a 'one liner' like:

perl -pe 'chomp;$x=$_;s/-//g;$y=$_;$_="echo else if name.equalsIgnoreCase(\"$x\")\n{\n\set$y(strBuff);\n}\n"' file_2

(save word in x, remove dashes; save new word in y, create print buffer, let perl do the loop - read - print. )

If you need the two files, then I like the 'pr' solution as long as they remain in sync. If not you'll just need a doubel read loop. Some variation on the following awk 'one liner':

awk '{getline y < "file_1";print "echo else if name.equalsIgnoreCase(\"" $1 "\")\n{\nset" y "(strBuff);\n}\n"}' file_2

Cheers,
Hein.