Archive::RAR...: treibt mich in den Wahnsinn! - #51764 (Fragen zu Perl-Modulen)

zipster

2005-02-23 09:04

User since
2004-09-06
458 Artikel
BenutzerIn
[default_avatar]

@Dubu
Erstmal vielen Dank...

WoW was du dir für ne Mühe gegeben hast. ;)

Man merkt wohl ganz stark an dem Code das ich eigentlich noch ein blutiger Anfänger bin ;)

Ich werde mal deine Tips umsetzten...

Vielen Dank nochmal

/EDIT

Ich hab noch einige Fragen zu deinen Verbesserungvorschlägen

Ich hoffe du kannst mir nochmal ein wenig weiterhelfen

Code: (dl )

...
if (/^\s*(\w+)\s*=\s*(.*)/) {
       $Config{$1} = $2;
   }
...

Was passiert da genau? Ich verstehs noch nicht so ganz.

Wie müßte da meine InI Datei aussehen?
So ungefähr?

Code: (dl )

#Programmpfad
C:\tools\client
#Backuppfad
Z:\Installs
...

Ist das

Code: (dl )

1
2
3

...
$datei_pfad =~ tr~/~\\~;
...

das selbe wie das?

Code: (dl )

1
2
3

...
 $datei_pfad=~ tr/\//\\/;
...

Wenn ja warum machst du da "~" hin? Was haben die da für ne Wirkung?

Code: (dl )

push @safe_datei, qq{"$datei_pfad"};

qq?
Bedeutet das das er alles was in der {} steht genau so in das array schiebt?

Code: (dl )

if (/^pre_rar\d+\.rar$/) ... # Vorne pre_rar, gefolgt von einer Zahl, gefolgt von .rar am Ende

Wie müßte das ausehen wenn die Datei "pre_rar1.part001.rar" heißt? Wobei ich nicht weiß wieviel Parts es gibt.
Wäre das richtig?

Code: (dl )

if (/^pre_rar\d+\.part\d+\.rar$/)

Quote
Das sieht grauslich aus, vor allem wenn man sieht, wie schoen du das in den Routinen time() und date() geloest hast. Warum nimmst du hier "scalar localtime (...)", statt gleich mit dem Array zu arbeiten und mit sprintf(), wie unten?

Weil ich mir diese 2 Routinen aus einem anderen Code geliehen habe. Ehrlich gesagt habe ich aber keine Ahung wie genau das funktioniert... :)\n\n

http://home.arcor.de/dsl-neunkirchen/etc/ie_firefo...