show only numbers before, within or after the text

[mailint1]

I have a long text file like this:

324yellow
34house
black
54532
15m21red56
44dfdsf8sfd23

How can I obtain (Perl - Windows/commandline/singleline) the following?

1) only the numbers at the beginning before some alpha text, like this:

324
34
15
44

2) only the numbers within the alpha text, like this:

21
8

3) only the numbers at the end after some alpha text, like this:

56
23

 

[stevexff]

[ol][li]/^(\d+)\w/[/li][li]/\w(\d+)\w/[/li][li]/\w(\d+)$/[/li][/ol]$1 will be set to the value you want in each case.

Steve

[small]"Every program can be reduced by one instruction, and every program has at least one bug. Therefore, any program can be reduced to one instruction which doesn't work." (Object:erlDesignPatterns)[/small]