my @TestArray = @{$ftp->dir ( "/$BkRoot/backup1/*" )}
my @TestArray = @{$ftp->dir ( "/$BkRoot/backup1" )}