X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=bin%2Fcdr-thinktel.import;h=9afd34cc5caedf75860906642681ca5c1734d0a8;hp=ccbd78c39f651158ef35a0a70276e4d2452e16e0;hb=1f2021c9b76da7cc59e2a981fbac6b24312876d2;hpb=79df9da17cf54366ef027a941c131cb1a016068e diff --git a/bin/cdr-thinktel.import b/bin/cdr-thinktel.import old mode 100644 new mode 100755 index ccbd78c39..9afd34cc5 --- 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 ) {