Perl's equivalent for awk's FILENAME

19/08/2006, 01h51

Is there a Perl's equivalent for awk's FILENAME?

for example,
perl -ple 'print FILENAME' *.txt

James

19/08/2006, 02h52

James wrote:
> Is there a Perl's equivalent for awk's FILENAME?
>
> for example,
> perl -ple 'print FILENAME' *.txt

perl -ple 'print $ARGV' *.txt

John
--
use Perl;
program
fulfillment

19/08/2006, 01h51	#1 (permalink)
James Messages: n/a Hébergeur:	Perl's equivalent for awk's FILENAME Is there a Perl's equivalent for awk's FILENAME? for example, perl -ple 'print FILENAME' *.txt James

19/08/2006, 02h52	#2 (permalink)
John W. Krahn Messages: n/a Hébergeur:	Re: Perl's equivalent for awk's FILENAME James wrote: > Is there a Perl's equivalent for awk's FILENAME? > > for example, > perl -ple 'print FILENAME' .txt perl -ple 'print $ARGV' .txt John -- use Perl; program fulfillment

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email