Die Zeit in Millisekunden, ohne eine Installation von einem extra-Paket?

Wie bekomme ich die Zeit in Millisekunden, in Perl ohne Installation von extra-Paket?

Läuft bei mir Linux.

date +%N gibt Ihnen Nanosekunden... können Sie von dort aus arbeiten? %s gibt Sekunden sinds 1970...
Irgendeinem Grund Sie nicht verwenden können Time::HiRes?
Warum können Sie nicht installieren ein Modul? Unabhängig, je nach Ihrer version von Perl haben Sie wahrscheinlich Time::HiRes (perldoc.perl.org/Time/HiRes.html) zur Verfügung.
date +%N funktioniert auf Linux, aber nicht AIX... (der traurige Tag)

InformationsquelleAutor JJ Liu | 2011-11-03

  1. 22

    Time::HiRes wurde ein Teil des Kerns, da Perl 5.7.3. Um zu überprüfen, für seine Verfügbarkeit, überprüfen Sie die Perl-version perl -v, oder versuchen Sie es mit perl -e 'use Time::HiRes;' sowohl von der Kommandozeile aus.

    Beispiel für die Nutzung:

    use Time::HiRes qw/ time sleep /;

my $start = time;
sleep rand(10)/3;
my $end   = time;

print 'Slept for ', ( $end - $start ) , "\n";

    Bauen auf Konerak Kommentar, wenn er nicht da ist oder es nicht verwendet werden kann, verwenden Sie das native Linux-Kommandos mittels backticks:

    sub time_since_epoch { return `date +%s.%N` }

print time_since_epoch;
    sollte date +%s.%N
    Zum laden und/oder überprüfen, ob ein Modul über die Befehlszeile, die Sie verwenden können: perl -MTime::HiRes-e 1 statt: perl -e 'use Time::HiRes'
    Danke für die Korrektur. @James_R_Ferguson : habe ich absichtlich ausgespart -M Flagge, da wollte ich nicht zu verwechseln die Fragesteller mit der syntax (mit 1 statt '' ist eine nette kleine Tipp aber :).
    danke! ist der Wert zurückgegeben, indem die Zeit in Millisekunden?
    Es ist die Zeit in Sekunden seit Jan 1, 1970 (auch bekannt als die Epoche)

    InformationsquelleAutor Zaid

Schreibe einen Kommentar