system("ls -1 $datum"); #### my @matches = `ls -1 $datum`; #### print for @matches;
## my @matches = `ls -1 $datum`; ##
## print for @matches;