On Dec 19, 2007 7:01 PM, Jenda Krynicky [EMAIL PROTECTED] wrote:
snip
I did not install it yet so I can't check but I think you have it
wrong. According to the docs you point to
@ARGV ~~ /\.mdb\z/
is equivalent to
grep /\.mdb\z/, @ARGV
which is true whenever at least one item in
On Dec 18, 2007 4:49 PM, Rob Dixon [EMAIL PROTECTED] wrote:
snip
if (grep { not /\.mdb\z/ } @ARGV) {
print All parameters must be MDB files\n;
exit;
}
snip
Or in Perl 5.10, coming to stores near you soon*, you can use the
smart match operator:
@ARGV ~~ /\.mdb\z/
or die All
From: Chas. Owens [EMAIL PROTECTED]
On Dec 18, 2007 4:49 PM, Rob Dixon [EMAIL PROTECTED] wrote:
snip
if (grep { not /\.mdb\z/ } @ARGV) {
print All parameters must be MDB files\n;
exit;
}
snip
Or in Perl 5.10, coming to stores near you soon*, you can use the
smart match
Hi,
If I have:
...
foreach (@ARGV) {
print do something only to .mdb files;
}
I could use File::Basename's fileparse and test for the file extension
and put a big if statement around or in the foreach loop. So if a user
puts a non .mdb file argument on the cmd line it won't process and
On Dec 18, 2007 10:08 PM, goldtech [EMAIL PROTECTED] wrote:
Hi,
If I have:
...
foreach (@ARGV) {
print do something only to .mdb files;
}
I could use File::Basename's fileparse and test for the file extension
and put a big if statement around or in the foreach loop. So if a user
goldtech wrote:
Hi,
If I have:
...
foreach (@ARGV) {
print do something only to .mdb files;
}
I could use File::Basename's fileparse and test for the file extension
and put a big if statement around or in the foreach loop. So if a user
puts a non .mdb file argument on the cmd line it