Ryan Moszynski wrote:
i have this string extracted from a text file i'm writing a program to
process:
test_freq = 1.0001;
and i have to extract the "1.0001"
i can't count on the whitspace being where it now is.
I would like to change this line of perl
$getTestFRQ =~ s/\D+//g;
so that instead of killing all non digit characters, it will kill all
non digit characters except for the period.
How do i do this?
thanks, ryan
try this
use strict;
use warnings;
my $input = 'test_freq = 1.0001; ';
if($input =~ /([\d\.]+)/) {
print $1,$/;
} else {
print "not found\n";
}
print $1,$/ if $input =~ /([\d\.]+)/;
$input =~ s/[^\d\.]//g;
print $input,$/;
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
