generating perl code from awk

[Farhat Habib]

Hi,

I have rather simple awk script which I would like to convert to Perl. I
am using a2p but unfortunately it gives me a syntax error.

----
syntax error in file tntvenn.awk at line 22
Translation aborted due to syntax errors.
----


for ( char in chars )
{ common = 1 ; out = ""
for ( name in names )
=> if ( (name,char) in data )
out = out char ": " data[name,char] "\n"
else
common = 0
if ( common )
print out
}
}

Line 22 is the line starting with =>

Any clues as to what's problem?

Thanks,
-F

 

[anno4000]

Hi,

I have rather simple awk script which I would like to convert to Perl. I
am using a2p but unfortunately it gives me a syntax error.

----
syntax error in file tntvenn.awk at line 22
Translation aborted due to syntax errors.
----


for ( char in chars )
{ common = 1 ; out = ""
for ( name in names )
=> if ( (name,char) in data )
out = out char ": " data[name,char] "\n"
else
common = 0
if ( common )
print out
}
}

Line 22 is the line starting with =>

That is incorrect awk code. The "in" keyword is only valid in a "for"
statement, not with "if".

Anno

 

[Farhat Habib]

Hi,

I have rather simple awk script which I would like to convert to Perl. I
am using a2p but unfortunately it gives me a syntax error.

----
syntax error in file tntvenn.awk at line 22
Translation aborted due to syntax errors.
----


for ( char in chars )
{ common = 1 ; out = ""
for ( name in names )
=> if ( (name,char) in data )
out = out char ": " data[name,char] "\n"
else
common = 0
if ( common )
print out
}
}

Line 22 is the line starting with =>

That is incorrect awk code. The "in" keyword is only valid in a "for"
statement, not with "if".

It seems to work with GNU awk. Is there a replacement for this that
would work with a2p?

Thanks,

-F

 

[anno4000]

[...]

That is incorrect awk code. The "in" keyword is only valid in a "for"
statement, not with "if".

It seems to work with GNU awk. Is there a replacement for this that
would work with a2p?

Good question, wrong newsgroup.

Anno