Awk è una funzione di utilità Unix è possibile utilizzare per estrarre i dati per il filtraggio e il reporting. Un comando awk può essere chiamato direttamente dalla linea di comando, uno script di shell o uno script Perl. Anche se uno script awk non può essere scritto direttamente all'interno di uno script Perl, è possibile eseguire utilizzando una chiamata di sistema Perl. Altri due comandi, gawk e nawk, fornire alternative alla awk che possono essere chiamati da perl nello stesso modo.

istruzione

1 Crea il tuo script perl con la direttiva interprete localizzare Perl sul vostro sistema. Questo è in genere "#! / Usr / bin / perl" o "#! / Usr / local / bin / perl", ma può variare a seconda delle particolari parametri di sistema.

2 Eseguire una chiamata di sistema Perl utilizzando il sistema function ():

( " 'Sceneggiatura --La tua awk qui--' awk input_file.txt") del sistema;

Le forche funzionali di sistema il processo di awk. Lo script perl attenderà il comando awk per terminare prima di continuare l'esecuzione.

3 Fuga caratteri utilizzando un backslash nello script awk che Perl possono interpretare i comandi come Perl, come ad esempio "$" e le virgolette. La chiamata può apparire come:

Sistema ( "awk '{print \ $ 5, \" \ t \ ", \ $ 6}' input_file.txt");

Questo script awk stamperà le colonne quinto e sesto "input_file.txt" separati da un carattere di tabulazione.