diff options
author | Ivan Kohler <ivan@freeside.biz> | 2012-12-14 19:32:44 -0800 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2012-12-14 19:32:44 -0800 |
commit | 7c3806cdbb65e125227fc78a3acbf188097a7e33 (patch) | |
tree | a1d23ffa7b9423c20b2df818945bd610114bf9b3 /httemplate/misc/phonenums.cgi | |
parent | 3bed798b18bf3a01343cd53fd3cfdf3463041bea (diff) |
DID selection for fibernetics, RT#19883
Diffstat (limited to 'httemplate/misc/phonenums.cgi')
-rw-r--r-- | httemplate/misc/phonenums.cgi | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/httemplate/misc/phonenums.cgi b/httemplate/misc/phonenums.cgi index fd5de2ae6..5084628eb 100644 --- a/httemplate/misc/phonenums.cgi +++ b/httemplate/misc/phonenums.cgi @@ -21,13 +21,13 @@ if ( $exchangestring ) { my %opts = (); if ( $exchangestring eq 'tollfree' ) { $opts{'tollfree'} = 1; - } - #elsif ( $exchangestring =~ /^([\w\s\:\,\(\)\-]+), ([A-Z][A-Z])$/ ) { - elsif ( $exchangestring =~ /^(.+), ([A-Z][A-Z])$/ ) { + } elsif ( $exchangestring =~ /^_REGION (.*)$/ ) { + $opts{'region'} = $1; + #} elsif ( $exchangestring =~ /^([\w\s\:\,\(\)\-]+), ([A-Z][A-Z])$/ ) { + } elsif ( $exchangestring =~ /^(.+), ([A-Z][A-Z])$/ ) { $opts{'ratecenter'} = $1; $opts{'state'} = $2; - } - else { + } else { $exchangestring =~ /\((\d{3})-(\d{3})-XXXX\)\s*$/i or die "unparsable exchange: $exchangestring"; my( $areacode, $exchange ) = ( $1, $2 ); |