if ( $oldValue =~ m|(\d+)| ) {
   $newValue = $1;
}