Gossamer Forum
(Advanced Search)
for
Home : General : Perl Programming :

How to get only the digits out of $input

Apr 19, 1999, 7:23 AM
ds
User (165 posts)
Apr 19, 1999, 7:23 AM
Post #1 of 4
Views: 3286
Shortcut
Quote Reply
How to get only the digits out of $input
When $input = "D-47462";

How do I make $input into "47462" ?

Normally I would use:
$input =~ s/A//gi;
$input =~ s/B//gi;
$input =~ s/C//gi;
But It should be much easier! (I Hope...)
Apr 18, 1999, 9:11 PM
cK
Enthusiast (567 posts)
Apr 18, 1999, 9:11 PM
Post #2 of 4
Views: 3182
Shortcut
Quote Reply
Re: How to get only the digits out of $input In reply to
Just want to say you can't rely on the users so therefore this code:

$inpit =~ s/(\D+)//g;

I hope it works, i did not tested it!

[This message has been edited by chrishintz (edited April 19, 1999).]
Apr 19, 1999, 8:47 AM
Mark Badolato
Veteran (1509 posts)
Apr 19, 1999, 8:47 AM
Post #3 of 4
Views: 3186
Shortcut
Quote Reply
Re: How to get only the digits out of $input In reply to
If the format of $input is always going to be the same (a letter, followed by a dash, followed by the 5 digit number), you could use:

$input = "D-47462";
$input = substr($input,2,5);

--mark
Apr 19, 1999, 11:02 AM
Mark Badolato
Veteran (1509 posts)
Apr 19, 1999, 11:02 AM
Post #4 of 4
Views: 3196
Shortcut
Quote Reply
Re: How to get only the digits out of $input In reply to
Yes that would work too, and would be a method to use if the value of input does NOT always meet the same format (I suppose I should have mentioned that before)

Smile

--mark