http://qs321.pair.com?node_id=913163


in reply to Re^4: php to perl

Very easily. 
$foo  = "My number is 123456";
$num = $foo;
$num =~ s/(\W|\D)//g;

print $num;

[download]

Replies are listed 'Best First'.
Re^6: php to perl
by Anonymous Monk on Jul 09, 2011 at 23:50 UTC
    very good

    thanks you

    for reponse :-)

    best regards

[reply]

In Section Seekers of Perl Wisdom