$cmd = "gawk -f D:\\tools\\scan_tdf.awk 
           corrtype=ada 
           FileSuffix=_pkg 
           TDFname=sys_mma_pfd_gmeter.tdf
           PrefixFile=d:\\tools\\PrefixFile
           BusNamesFile=d:\\data\\ssi_BusNames 
           VAXPATH=NONE
           DIRPATH=def";

  print "cmd is $cmd \n";
  $sts = system($cmd);