Awk is een Unix nutsfunctie u kunt gebruiken om gegevens te extraheren voor het filteren en rapportage . Een awk commando kan direct worden opgeroepen vanaf de command line , een shell script of een Perl-script . Hoewel een awk script kan niet worden direct in een perl script geschreven , kunt u het uit te voeren met behulp van een perl system call . Twee andere commando's , gapen en nawk , bieden alternatieven voor awk die kunnen worden aangeroepen vanuit perl op dezelfde manier . Instructies
1 Maak uw perl script met de tolk richtlijn lokaliseren perl op uw systeem . Dit is typisch " # ! /Usr /bin /perl " of " # ! /Usr /local /bin /perl , " maar dit kan variëren afhankelijk van uw specifieke systeemparameters . Kopen van 2 uitvoeren van een perl -systeem bellen met behulp van het systeem ( ) functie : systeem
( " awk ' - je awk script hier - ' input_file.txt " ) ;
het systeem functie vorken het proces awk . Uw perl script zal wachten op de awk opdracht te voltooien voordat het verder wordt uitgevoerd .
3 Escape tekens met een backslash in de awk script dat perl kunnen interpreteren als Perl commando's , zoals " $ " en aanhalingstekens . Uw oproep kan er zo uitzien : systeem
( " awk ' {print \\ $ 5, \\ " \\ t \\ " , \\ $ 6} ' input_file.txt " ) ;
awk script zal de vijfde en zesde kolom van " input_file.txt " gescheiden door een tab-teken af te drukken .
|
