Verständnisproblem mit der Zeit in Perl (stat/mtime) (gelöst) - #146940 (Allgemeines zu Perl)

bianca

2011-03-27 10:41

User since
2009-09-13
7016 Artikel
BenutzerIn

user image

Da ich ohnehin Date::Calc überall verwende hab ich mir mal dessen System_Clock() Aufruf angeschaut.
Tatsächlich liefert der Aufruf im letzten Parameter $dist eine 1 zurück.

Wenn ich den verwende, um zu entscheiden, ob von der stat() Zeit 60 Minuten abgezogen werden, ist das in Euren Augen sinnvoll? Wäre das der geeignete Weg?

Code (perl): (dl )

#!/usr/bin/perl -w
use strict;
use warnings;
use Date::Calc qw (
    System_Clock
);
use Data::Dumper;

my @test = System_Clock (0);
print Dumper (\@test);
print "Doofe Sommerzeit aktiv: " . ($test[8] == 1 ? 'ja' : ($test[8] == -1 ? 'unbekannt' : 'nein')) . "\n";

Code: (dl )

$VAR1 = [
          2011,
          3,
          27,
          10,
          41,
          5,
          86,
          7,
          1
        ];
Doofe Sommerzeit aktiv: ja

10 print "Hallo"
20 goto 10