diff options
Diffstat (limited to 'bin/print-directory_assist')
-rwxr-xr-x | bin/print-directory_assist | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/bin/print-directory_assist b/bin/print-directory_assist deleted file mode 100755 index 4c5e4a861..000000000 --- a/bin/print-directory_assist +++ /dev/null @@ -1,12 +0,0 @@ -#!/usr/bin/perl -w - -use strict; - -my $acs = `cut -c1-3 ../etc/areacodes.txt`; - -my $plus = ''; -foreach my $npa ( split(/\n/, $acs ) ) { - warn $npa; - $plus .= $npa. '5551212,'; -} -print "$plus\n"; |