On 2002.02.03 16:42 Trey Harris wrote:
Given the following code:
#!/usr/bin/perl -v
use filetest 'access';
foreach (@ARGV) {
print(Can, -x $_ ? : NOT, execute $_.\n);
}
__END__
The filename being tested is printed at the point of filetest, i.e.
Canfoo NOT execute foo..
PerlBug Database overview, figures in brackets() are still open:
---
Bugs Messages Patches Tests Notes Admins 24hrs 7days 30days 90days
7580 1336338 12 47658 1 2 3
Robin Barker wrote:
[snip]
+ my $fh = FileHandle-new;
+ if ($fh-open($configpmtest)) {
+ $fh-print(1;\n);
I'm just a bit curious... is there any reason you're using FileHandle,
rather than IO::File ?
It was in the piece of repeated code I copies and