interate files in glob 1

[msingle]

How would I count the number of file in:
e.g. my @files = sort glob ('3E*.log');
??

 

[goBoating]

the index of the last element in any array can be found like
@array = ('1','2','3','4');
$index_of_last_element = [red]$#[/red]array;

#!/usr/local/bin/perl
my @files = sort glob ('*.gif');
print "How Many?

[red]$#[/red]

files\n";
print "FILES: \n@files\n";

'hope this helps

If you are new to Tek-Tips, please use descriptive titles, check the FAQs, and beware the evil typo.

 

[tanderso]

Using the $# syntax gives you the last index, which is actually n-1 where n is the number of files since the array begins at zero. To get the file count, use

my $count = scalar @files

.
Sincerely,

Tom Anderson
CEO, Order amid Chaos, Inc.

http://www.oac-design.com