perlunity.de - PERL | JAVASCRIPT | PHP | MySQL | APACHE



#!/COMMUNITY

Members: 5374
davon online: 1
weitere User: 27
Click for quality!




10.02.2012 / 21:05

Community-Member werden   |   Paßwort vergessen   |   OnlineMonitor (1) Wer ist online ... OnlineMonitor starten !
     

 

Home


PERLscripts


PHPscripts


JAVAscripts


Hilfreiches


Links2www


Newscenter


Community


Interna




Community  »  Perl: Allgemeines Forum zur Themenübersicht Themensuche Themenansicht in Thread-Modus


BeitragTar Archive enthält keine Pfade
Seitenanfang
Hallo zusammen,

ich möchte via Perl eine Sicherung einer Verzeichnisstruktur erstellen.

Leider verliert das Script bei der Erstellung des Tar Archives die Pfade zu den Dateien.

Was mache ich hier falsch?

Wer kann mir hier weiterhelfen?

Besten Dank im Voraus

Gruß
Franz-Josef

-------------------------------------------


#!/usr/bin/perl

use File::Find;
use Archive::Tar;

# Sicherungsdirectory, mit Slash am Ende notieren
$directory = "c:/TEMP/";
# Name des zu erstellenden Archives
$archive = "Sicherung.tar";
$sikdir = "c:/sw-inst";

$compressed = 1;

$tar = Archive::Tar->new();
finddepth(\&AddToTar, no_chdir, $directory);

sub AddToTar {
print "File: $_ $File::Find::name\n";
$tar->add_files($File::Find::name);
#$tar->add_files($_);
}

$tar->write($sikdir."\/".$archive.".tgz", $compressed);

Datum: 19.12.2007-13:07

-






-
-