Craig Moynes wrote:
: $params{f} = "%E %e %d";
: output:
: %E %e %d
: %d
:
: So %e is not found....
:
: $params{f} = "%d %e";
: output:
: %d %e
: %e
I can't reproduce this error with the code you posted.
Here's the script I tried:
#!/faxafloi/data1/bin/perl
use Getopt::Std;
use strict;
my @matches;
my ( %params );
getopts('DRSa:f:s:d:r:b:w:n:h?', \%params);
@matches = $params{f} =~ /(%[aAbBcCdDehHIjmMnprStTuUVwWyY%])/g;
print "$params{f}\n";
print "@matches\n";
With a command line of -f '%E %e %d' I get an output of
%e %d
-- tdk
