if ($input =~ m/^([-+]?[0-9]+(\.[0-9]*)?) *([CF])$/)




-----------------------------------------------------------------------------
Copyright 1997-2025 Jeffrey Friedl