Re: Regex Help

How would you write it?
Try something like so:

use strict;
use warnings;


while(<DATA>){
  chomp;
  print $1,$/ if/(\D+?)\d+?/;
}

__DATA__
piratesofcareebian100
pirates of careebian100
pirates of careebian 100
[download]

Please also check these documentation perlre, perlrequick and perlretut

If you tell me, I'll forget.
If you show me, I'll remember.
if you involve me, I'll understand.
--- Author unknown to me

In Section Seekers of Perl Wisdom