perl glob returning number

[Noah]

Hi there,

why is the perl glob command returning a number and not the filenames?

my (@filenames, @files);
for my $file (@files) {
#    my $filename = "$directory/*$file"; 

#    print "$filename\n"; 


    @files = <$directory/*$file> or die $!;
    print @files . "\n";
    push @filenames, @files;
}

$ ips.pl
29
41

--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/