Out of Memory! mit Archive::Tar - #190136 (Allgemeines zu Perl)

RalphFFM

2019-06-23 20:21

User since
2006-11-16
258 Artikel
BenutzerIn

Ich möchte den Inhalt jedes Verzeichnisses mittels Archiv::Tar in jeweils ein Archiv packen. Funktioniert auch. Nur bei 1 Verzeichnis nicht. Dort drin liegt eine einzige Datei, die ist 4,3 GB groß. Archiv::Tar bricht die Skriptausführung an dieser Stelle abrupt ab, anstatt daß der Befehl (vermutl. "add_files(..)") fehlschlägt, und in Gottes Namen dann halt mit dem "or"-Befehl weitergemacht wird.
Hat jemand eine Idee wie man das stabiler machen kann? Im voraus Danke für Rat.

Hier der Problemteil:

Code: (dl )

print 'Komprimiere Verzeichnis ' . $strScanDir . ".\n";
chdir ($strScanDir)
    or die 'FEHLER: chdir zu ' . $strScanDir . ' nicht möglich: ' . $!;
my $tar = Archive::Tar->new();
$tar->add_files (@arrFiles)
    or logMessage ('FEHLER: Inhalt von Verzeichnis ' . $strScanDir . ' konnte nicht zum Archiv hinzugefügt werden: ' . $!);
$tar->write ($strUsbstick . $strScanDir . '/backup.tgz', 6)
    or logMessage ('FEHLER: Archiv von Verzeichnis ' . $strScanDir . ' konnte nicht geschrieben werden: ' . $!);