my $no_filter= Gtk2::FileFilter->new();
$no_filter->set_name("All");
$no_filter->add_pattern("*");

# erzeuge einen neuen DateiAuswahlDialog
my $filesel = Gtk2::FileChooserDialog->new("Select...", undef, 'select-folder', # aletrnativ 'open' zum selektieren von Dateien
                                           'gtk-cancel', 'cancel',
                                           'gtk-ok', 'ok');
# Mehrfache Auswahl erlaubt
$filesel->set_select_multiple(1);

# Setze Bilder-Filter als ersten Filter
$filesel->add_filter($image_filter);

# Setze "no_filter" als zweiten
$filesel->add_filter($no_filter);

# Zeige die Dateiauswahl
my $resp = $filesel->run;

# Wenn "ok" ausgewählt wurde
# dann übernehme die ausgewählte Dateiliste
my @filelist = $filesel->get_filenames if($resp eq 'ok');

# Auswahldialog löschen
$filesel->destroy;

# Augewählte Dateien listen
print join("\n",@filelist)."\n";