$original_text="Olympus xModel 3.1mp";
$original_text=~ s/(><=\d)mp\b//g;
print "\n$original_text";