|
awk est une fonction d'utilité Unix vous pouvez utiliser pour extraire des données de filtrage et de reporting. Une commande awk peut être appelé directement à partir de la ligne de commande , un script shell ou un script Perl. Même si un script awk ne peut pas être directement écrit dans un script perl , vous pouvez l'exécuter en utilisant un appel système perl . Deux autres commandes, gawk et nawk , proposer des alternatives à awk qui peuvent être appelés à partir de perl de la même façon . Instructions
1 Créer votre script perl avec la directive de l'interpréteur perl localiser sur votre système. C'est typiquement "#! /Usr /bin /perl " ou "# ! /Usr /local /bin /perl ", mais peut varier en fonction des paramètres de votre système particulier.
2 exécuter un appel système perl utilisant la fonction system () : système de
( " awk ' - votre script awk ici - ' input_file.txt ");
fourchettes de fonction le système le processus awk. Votre script perl attendra la commande awk pour terminer avant de poursuivre l'exécution .
3 caractères Escape l'aide d'une barre oblique inverse dans le script awk que Perl peut interpréter comme des commandes Perl, tels que " $ " et les guillemets . Votre appel peut ressembler à: système de
( " awk '{print $ \\ 5 \\" \\ t \\ " , \\ $ 6} ' input_file.txt ");
awk script imprimer les cinquième et sixième colonnes de " input_file.txt " séparées par un caractère de tabulation .
|
