From: jeff Date: Tue, 7 Apr 2009 02:50:46 +0000 (+0000) Subject: a tollfree regex that captures 88x and works with +1 X-Git-Tag: root_of_svc_elec_features~1297 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=792155f15ac9c520dac7b72fdbddd894bd2b3133 a tollfree regex that captures 88x and works with +1 --- diff --git a/FS/FS/cdr.pm b/FS/FS/cdr.pm index bc5bb8d4e..0230adcd8 100644 --- a/FS/FS/cdr.pm +++ b/FS/FS/cdr.pm @@ -277,7 +277,7 @@ sub check { sub is_tollfree { my $self = shift; - ( $self->dst =~ /^(\+?1)?8([02-8])\1/ ) ? 1 : 0; + ( $self->dst =~ /^(\+?1)?8(8|([02-7])\3)/ ) ? 1 : 0; } =item set_charged_party