X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=bin%2Fcdr-thinktel.import;fp=bin%2Fcdr-thinktel.import;h=9afd34cc5caedf75860906642681ca5c1734d0a8;hb=777e0e68f1200ea601fc4eabe0ed4da13628b233;hp=ccbd78c39f651158ef35a0a70276e4d2452e16e0;hpb=24c01f6992422b45aadb867371bc44795b48042e;p=freeside.git diff --git a/bin/cdr-thinktel.import b/bin/cdr-thinktel.import index ccbd78c39..9afd34cc5 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 ) {