my $ssh_surv = Net::SSH::Perl->new($_[1], debug => 1);
	$ssh_surv->login();

        # alter/abspeicherdatum aller .ssf dateien im ordner ermitteln (ca. 10 Dateien)
	my($out, $err, $exit) = $ssh_surv->cmd("ls -l ./pfad/*.ssf | awk '{\$6}'");
	print "$out\n";  # print nur als beispiel