Can somebody enlighten me what I'm doing wrong?

I have a list in a file , "test.dat"

sh> cat test1.dat
0039
0038

sh>  cat test1.pl
#!/usr/bin/perl -w
use strict;
my $input = $ARGV[0];

my @devices =  <$input>  ;
print "devices =  @devices \n";

__END__

now run it with
sh> test.pl test1.dat

Can't use string ("test1.dat") as a symbol ref while "strict refs" in
use at ./test.pl line xx.


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to