$_ = '22C'; s/(\d+)C/($1*9*.2)+32 . "F"/ge; print; print "\n"; $_ = '0C'; s/(\d+)C/($1*9*.2)+32 . "F"/ge; print; print "\n";