Wie kann ich ein Verzeichnis mit Ausnahme aller versteckten Dateien in Perl kopieren?

Question

Ich habe eine Verzeichnishierarchie mit einer Reihe von Dateien. Einige der Verzeichnisse beginnen mit einem . . Ich möchte die Hierarchie an einen anderen Ort kopieren und dabei alle Dateien und Verzeichnisse auslassen, die mit einem .

Wie kann man das tun?

Answer 1

Ich fand Datei::Kopieren::Rekursiv rcopy_glob().

Die folgenden Angaben werden in den Dokumenten aufgeführt, sind aber irreführend.

use File::Copy::Recursive qw(fcopy rcopy dircopy fmove rmove dirmove);

rcopy_glob() wird nicht importiert, und die einzige Möglichkeit, die ich gefunden habe, um es zu verwenden, war, wie folgt explizit zu sein:

use File::Copy::Recursive;

File::Copy::Recursive::rcopy_glob("glob/like/path","dest/path");