filevar
116 |
Operatorii de test al fişierelor se pot
utiliza şi asupra variabilelor fişier filevar
.
Următoarea secvenţă de cod exemplifică acest lucru utilizānd
operatorul z
(care testează dacă fişierul este vid) asupra variabilei fişier
MYFILE
:
if (-z MYFILE) {
print ("This file is empty!\n");
}
Perl permite utilizarea argumentelor liniei de
comandă prin definirea unui variabile array speciale numită @ARGV
.
Atunci cānd un program Perl īsi īncepe execuţia, această variabilă
conţine o listă ce constă din argumentele liniei de comandă.
De exemplu, comanda
perl tst46.pl word myfile1 myfile2
atribuie variabilei @ARGV
lista
("word", "myfile1", "myfile2")
Lansarea acestui program se face printr-o linie de comandă de forma
perl tst46.pl $a= tst12.pl tst12.pl
unde tst46.pl este numele programului care execută contorizarea, cuvāntul căutat este $a= şi tst12.pl tst12.pl sunt fişiere īn care să caute.
Secvenţă cod |
|
Rezultat īn consola text |
|
|
Word to search for: $a= occurrences in file tst12.pl: 35 occurrences in file tst12.pl: 35 total number of occurrences: 70 |
© Cornel Mironel Niculae, 2003-2004
13-Nov-2009