Differences

This shows you the differences between two versions of the page.

Link to this comparison view

a2p_hayek.0 [2013/12/19 05:56]
hayek
a2p_hayek.0 [2018/07/29 01:22]
Line 1: Line 1:
-= a2p = 
-Hayek'​s Linux Manual 
- 
-(Awk to Perl translator) 
- 
-== Description == 
-a2p takes awk scripts as input and produces a perl script 
- 
-== Useful Flags == 
-NA 
- 
-== Examples == 
-  [[email protected] tmp]$ cat awk.awk ​ 
-  {print $1} file 
-  ​ 
-  [[email protected] tmp]$ a2p awk.awk ​ 
-  #​!/​usr/​bin/​perl 
-  eval 'exec /​usr/​bin/​perl -S $0 ${1+"​[email protected]"​}'​ 
-    if $running_under_some_shell;​ 
-  # this emulates #! processing on NIH machines. 
-  # (remove #! line above if indigestible) 
-  eval '​$'​.$1.'​$2;'​ while $ARGV[0] =~ /​^([A-Za-z_0-9]+=)(.*)/​ && shift; 
- # process any FOO=bar switches 
-  ​ 
-  $, = ' '; # set output field separator 
-  $\ = "​\n";​ #​ set output record separator 
-  ​ 
-  while (<>) { 
-    chomp; # strip record separator 
-    @Fld = split('​ ', $_, -1); 
-    print $Fld[(1)-1];​ 
-    print $_ if $file; 
-  } 
  

QR Code
QR Code a2p_hayek.0 (generated for current page)