use strict;
use warnings;


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

__DATA__
piratesofcareebian100
pirates of careebian100
pirates of careebian 100