Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine

Re^2: Win32 gawk vs. Unix awk

by gibsonca (Beadle)
on Nov 30, 2009 at 14:48 UTC ( #810191=note: print w/replies, xml ) Need Help??

in reply to Re: Win32 gawk vs. Unix awk
in thread Win32 gawk vs. Unix awk

On the DOS side, things are still not working like UNIX. gawk (GNU Awk 3.1.6) is calling the scan_tdf.awk file, but none of the values like corrtype are being passed over. The files are the same between UNIX and DOS.

$cmd = "gawk -f D:\\tools\\scan_tdf.awk 'corrtype=ada', 'FileSuffix=_p +kg', 'TDFname=sys_mma_pfd_gmeter.tdf', 'PrefixFile=d:\\tools\\PrefixF +ile', 'BusNamesFile=d:\\data\\ssi_BusNames', 'VAXPATH=NONE', 'DIRPATH +=NONE'"; print "cmd1 is $cmd \n\n"; $sts = system($cmd); print "sts1 from gawk is $sts \n"; exit(0);

Still looking for help!

I have tried modifying the calling parameters in many ways...

Replies are listed 'Best First'.
Re^3: Win32 gawk vs. Unix awk
by gibsonca (Beadle) on Nov 30, 2009 at 15:28 UTC

    So I solved this little DOS GNU gawk problem by using the "-v" argument. Everything now works like UNIX. Back to converting this to perl. ;-)

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://810191]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (5)
As of 2018-06-20 10:09 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (116 votes). Check out past polls.