open my $fh, "<", "items/list.db";
I can't test it right this second, but I'm guessing it's the my() call inside of the open. Try this:
my $fh; open $fh, '<', 'items/list.db' or die "File error: $!"; print while $fh; close $fh;
Hope that helps.
James
print while (<$fh>); close $fh;
This is suppose to printout the content in items/list.db , but why I get somthing like "GLOB(0x162aca7)" ??
Thanks in advise.
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
