perl -e '$dd = "/tmp";@a = `ls $dd/*.xml`;$s = @a;print "$s Dateien";'