diff options
author | Jeremy Davis <jeremyd@freeside.biz> | 2014-09-05 12:01:09 -0400 |
---|---|---|
committer | Jeremy Davis <jeremyd@freeside.biz> | 2014-09-05 12:01:09 -0400 |
commit | 793f8a0bef01192d9ac889808a462f2166d71c4f (patch) | |
tree | a4201308ac44d2962591004ae1b18bef5e3a43c6 | |
parent | 03e71483c54ec32d701d6726ec0f5b6b8aa48b02 (diff) |
#14049 fix regex
-rw-r--r-- | FS/FS/part_export/nena2.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/FS/FS/part_export/nena2.pm b/FS/FS/part_export/nena2.pm index 50f4b1695..e172a15a9 100644 --- a/FS/FS/part_export/nena2.pm +++ b/FS/FS/part_export/nena2.pm @@ -15,7 +15,7 @@ my %upload_targets; tie %options, 'Tie::IxHash', ( 'company_name' => { label => 'Company name for header record', - type => 'text' + type => 'text', }, 'company_id' => { label => 'NENA company ID', type => 'text', @@ -226,8 +226,8 @@ sub data { $hash{function_code} = $function_code{$action}; # Add default area code if phonenum is 7 digits - if ($self->option('area_code') =~ /^\d{3}/ && $svc->phonenum =~ /^\d{7}/ ){ - $svc->phonenum = $self->option('area_code'). $svc->phonenum + if ($self->option('area_code') =~ /^\d{3}$/ && $svc->phonenum =~ /^\d{7}$/ ){ + $svc->phonenum = $self->option('area_code'). $svc->phonenum; } # phone number |