Awk er et Unix nyttefunksjon du kan bruke til å hente ut data for filtrering og rapportering . En awk -kommandoen kan kalles direkte fra kommandolinjen , en shell script eller et Perl-skript . Selv om en awk script ikke direkte kan skrives i et perl script , kan du utføre den ved hjelp av et perl systemkall . To andre kommandoer, glaner og nawk , gi alternativer til awk som kan kalles fra perl på samme måte . Instruksjoner
en
Lag din perl script med tolken direktiv finne perl på systemet ditt . Dette er typisk "# ! /Usr /bin /perl " eller "# ! /Usr /local /bin /perl ", men kan variere avhengig av din spesielle system parametere .
2
Utfør et perl system anrop ved hjelp av systemet ( )-funksjonen : en
system ( " awk '- din awk script her - ' input_file.txt ");
systemet fungere gafler den awk prosessen. Din perl script vil vente på awk -kommandoen for å avslutte før det fortsetter utfører .
3
Escape tegn ved hjelp av en skråstrek i awk skript som perl kan tolke som perl kommandoer, for eksempel " $ " og anførselstegn . Samtalen kan se slik ut : en
system ( " awk ' {print \\ $ 5 , \\ " \\ t \\ ", \\ $ 6 } input_file.txt ");
awk skriptet vil skrive ut de femte og sjette kolonner med " input_file.txt " atskilt med en fane karakter.