open (LISTA, "find $folder -type f|")
  or die "Cannot find '$folder': $!";