Thread Skript für automatische Backups (27 answers)
Opened by mollilinux at 2010-02-23 14:06

mollilinux
 2010-02-23 16:58
#133537 #133537
User since
2010-02-16
19 Artikel
BenutzerIn
[default_avatar]
sid_burn
Unter perl bekommst du dies mit der Funktion "time()".


Habe jetzt den pseudocode getUnixTime() (UnixTimestamp) mit time() ersetzt. Die Frage ist jetzt ob ich noch localtime($timing) bei $timenow einbauen soll. Wenn ich nur time() nehme, kommt eine schnelle Wiederholungsrate.

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40

#!/usr/bin/perl

use POSIX;                      # Unix Timestamp
use Net::SCP qw(scp);           # Datentransfer via SCP

# Login Informationen
my $user = 'USER';
my $host = 'HOST';

my $startTime = time();
my $timeNow = $startTime;
my $duration = 3;
my $auth = 0;
my $tmp;

print "Automatisches Backup";

while (true) { # daemon-Schleife
  if ( ( ($timeNow - $startTime) % (120 + $duration) ) == 0 ) {
  
    while ( not $auth ) { # Verbindungsschleife
      if ( ( ($timeNow - ($startTime+$duration)) % 5 ) == 0 ) {
        # doConnect();
        $scp = Net::SCP->new($host, $user);
        # doAuth();
        print "Wiederholungsrate";
      }
      $tmp = time();
      $duration = $tmp - $timeNow;
      $timeNow = tmp;
    }

    getLogs();
    disconnect();
    $auth = 0;
  }

  $duration = time() - $timeNow;
  $timeNow = time();
}


Ich erhalte diese Ausgabe:

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
molli@penguin ~/projects/mprm $ perl main.pl
...
rholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholung
srateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWi
ederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederhol
ungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrat
eWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWieder
holungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrate
WiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederh
olungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsr
ateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWied
erholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholun
gsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateW
iederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsrateWiederholungsr
...
molli@penguin ~/projects/mprm $


Aber es müsste 5Sekunden dauern bevor sich die Verbindungsschleife wiederholt?

Was mache ich falsch?

Gruss mollilinux
Last edited: 2010-02-23 17:24:20 +0100 (CET)

View full thread Skript für automatische Backups