Select Code to Download

if ($value =~ /\d{1,3}\s{1,2}-\d{3,5}\s{1,4}/)

if ($value =~ 
    /\d{1,3}     # 1 to 3 digits
     \s{1,2}     # 1 or 2 whitespace
...
     \d{3,5}     # 3, 4, or 5 digits
     \s{1,4}     # 1 to 4 whitespace
    /x)