Ok ich habe die Lösung gefunden..
Man muss das Modul ScanDeps.pm patchen....
(Kann das ev. jemand ins Wiki schreiben?)
----- LÖSUNG ----
Quote--- Module/ScanDeps.pm.orig 2005-05-19 13:36:11.000000000 +0200
+++ Module/ScanDeps.pm 2005-05-19 13:49:59.000000000 +0200
@@ ca. Zeile: -> 295 @@
'Tk/Balloon.pm' => [qw( Tk/balArrow.xbm )],
'Tk/BrowseEntry.pm' => [qw( Tk/cbxarrow.xbm Tk/arrowdownwin.xbm )],
'Tk/ColorEditor.pm' => [qw( Tk/ColorEdit.xpm )],
+ 'Tk/DragDrop/Common.pm' => sub {
+ _glob_in_inc('Tk/DragDrop', 1);
+ },
'Tk/FBox.pm' => [qw( Tk/folder.xpm Tk/file.xpm )],
'Tk/Toplevel.pm' => [qw( Tk/Wm.pm )],
'URI.pm' => sub {
Läuft nun wunderbar..
$i='re5tsFam ^l\rep';$i=~s/[^a-z| ]//g;$\= reverse "\U!$i";print;