my @types =
      (["HTML Dokumente", [qw/.htm .html/]],
       ["Scripte", [qw/.cgi .php .php3 .pl .asp/]],
       ["Text Files", '.txt'],
       ["All Files", '*']);