in reply to extract numbers from unformatted text strings
$s =~ /(\d+)(?:to|thru|up to|\s*-\s*)(\d+)/; [download]