http://www.perlmonks.org?node_id=1041162


in reply to only numeric data

Hi

Would using looks_like_number() help?

use Modern::Perl;
use Scalar::Util qw /looks_like_number/;

my @data=("conteent" , , , ,25.36,36.36,85.1,'xx','.....');

for (@data) {
    say $_ if looks_like_number($_);
}

[download]

Output

~/perl/ex/perlmonks: perl check_numbers.pl 
25.36
36.36
85.1

[download]

I hope this helps

Arnaud

In Section Seekers of Perl Wisdom