diff options
author | levinse <levinse> | 2011-01-11 15:49:13 +0000 |
---|---|---|
committer | levinse <levinse> | 2011-01-11 15:49:13 +0000 |
commit | 05ff1db02237afada9acbbf43990b4bbf4c78636 (patch) | |
tree | 4f77945a1854bb23e00e83db140d0f85ed4d343b /httemplate/misc | |
parent | 51e350319a224c3212ab9406da7ecf3ebe8f285d (diff) |
Vitelity DID selection improvements, RT4868
Diffstat (limited to 'httemplate/misc')
-rw-r--r-- | httemplate/misc/phonenums.cgi | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/httemplate/misc/phonenums.cgi b/httemplate/misc/phonenums.cgi index b86d03f5d..108a5f7cd 100644 --- a/httemplate/misc/phonenums.cgi +++ b/httemplate/misc/phonenums.cgi @@ -13,11 +13,15 @@ if ( scalar(@exports) > 1 ) { die "no DID providing export attached to svcpart $svcpart"; } my $export = $exports[0]; - + my %opts = (); if ( $exchangestring eq 'tollfree' ) { $opts{'tollfree'} = 1; } +elsif ( $exchangestring =~ /^([\w\s]+), ([A-Z][A-Z])$/ ) { + $opts{'ratecenter'} = $1; + $opts{'state'} = $2; +} else { $exchangestring =~ /\((\d{3})-(\d{3})-XXXX\)\s*$/i or die "unparsable exchange: $exchangestring"; |