--- foxridge-archiver/unarchiver.pl 2005/09/20 17:30:34 1.5 +++ foxridge-archiver/unarchiver.pl 2007/03/21 14:21:01 1.6 @@ -18,7 +18,7 @@ $|=1; # # program version -my $version = "0.3.1 (21.6.2005)"; +my $version = "0.3.2 (21.3.2007)"; # read command line parameters my $args = parseargs; @@ -205,6 +205,8 @@ sub run_retrieve { $archcmd .= " '$archmount/'"; # archive mount point $archcmd .= " '$archparent/'"; # destination dir name + logger('INFO', "querying TSM server for $archmount, please wait..."); + my $archcnt = 0; my $numfiles = 0; print LOG "CMD: $archcmd\n";