Erwin: (PERL) Verzeichnisse + Inhalt rekursiv kopieren

Beitrag lesen

hi,

use File::Copy;

siehe auch
File::Path;

Das lokale Verzeichnis ermitteln und ggf. anlegen

my $dirname = dirname($local_file);
 if ( not -d $dirname ){
  mkpath( $dirname, 0, 0666 );
 }

Erwin

--
SELFforum - Das Tor zur Welt!
Theoretiker: Wie kommt das Kupfer in die Leitung?
Praktiker: Wie kommt der Strom in die Leitung?