diff options
| -rwxr-xr-x[-rw-r--r--] | bin/cdr-thinktel.import | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/bin/cdr-thinktel.import b/bin/cdr-thinktel.import index ccbd78c39..9afd34cc5 100644..100755 --- a/bin/cdr-thinktel.import +++ b/bin/cdr-thinktel.import @@ -52,7 +52,8 @@ $ftp->login($login, $password) warn "Retrieving directory listing\n" if $opt_v; $ftp->cwd('/'); -my @files = $ftp->ls(); +my @files = grep { $_ =~ /MetaSwitch/ } $ftp->ls(); + warn scalar(@files)." CDR files found.\n" if $opt_v; # apply date range if ( $opt_a ) { |