Help for this page

Select Code to Download


  1. or download this
    ($newValue) = $oldValue =~ /_(\d+)\./;
  2. or download this
    ($newValue) = $oldValue =~ /_(\d+)\./ or warn "bad format: '$oldValue'";
  3. or download this
    if (($newValue) = $oldValue =~ /_(\d+)\./) {
   # all is ok
} else {
   # something went wrong
}