Awk är ett Unix nyttofunktion du kan använda för att extrahera data för filtrering och rapportering . En awk kommando kan anropas direkt från kommandoraden , ett shell script eller ett Perl-skript . Även en awk skript inte kan direkt skrivas inuti ett Perl-skript , kan du köra den med ett perl systemanrop . Två andra kommandon , gawk och nawk , ge alternativ till awk som kan anropas från perl på samma sätt . Instruktioner
1
Skapa din perl skriptet med tolken direktivet lokalisera perl på ditt system . Detta är vanligtvis " # ! /Usr /bin /perl " eller " # ! /Usr /local /bin /perl , " men kan variera beroende på dina speciella systemparametrar .
2
Kör ett perl systemanrop använder systemet ( ) funktionen :
systemet ( " awk ' - din awk script här - " input_file.txt " ) ;
systemets funktion gafflar den awk processen . Din perl skript kommer att vänta på awk kommando för att avsluta innan det fortsätter utför .
3
Escape tecken med ett omvänt snedstreck i awk skript som perl kan tolka som perl kommandon, som " $ " och citattecken . Ditt samtal kan se ut :
systemet ( " awk ' {print \\ $ 5, \\ " \\ t \\ " , \\ $ 6} ' input_file.txt " ) ;
awk script skriver ut de femte och sjätte kolumnen för " input_file.txt " åtskilda av en tabb .
