Eine Epoche Wert ist ein Unix -Zeitstempel , der die Anzahl der Sekunden, die seit 1. Januar 1970 bestanden haben, berechnet . Dieser Wert macht es einfach, Berechnungen auf Daten in verschiedenen Programmiersprachen durchführen . In Perl, rufen Sie die " Zeit "-Funktion , um die Epoche Termin zu bekommen . Sie können diesen Wert auf dem Bildschirm auszugeben , speichern Sie es in einer Variablen oder wandeln Sie es in ein lesbares Datum mit Arrays und Perl " localtime "-Funktion . Anleitung
1
Öffnen Sie ein Perl-Programm -Datei. Setzen Sie den Cursor an die Epoche Datum und Uhrzeit
2
Typ "print Zeit, " bekommen wollen . (Ohne Anführungszeichen) . Dieser Code ruft die Zeit -Funktion , um die Epoche Zeit bekommen, dann druckt sie auf dem Bildschirm
3
Geben Sie den folgenden Code:
my $ Epoche = Zeit ; < . br>
my @ Monate = (" Jan ", " Februar ", " März ", " April ", " Mai ", " Juni ", " Juli ", " August ", " September ", " Oktober " , " November ", " Dezember ");
my @ Tage = (" Sun" , "Mon ", " Tue " , "Wed " , "Thu " , "Fri ", " Sat" );
my ($ sec, $ min , $ h , $ tag, $ month , $ year , $ wday ) = ( localtime ($ Epoche) ) [ 0,1,2,3,4,5,6 ] ;
print " Epoch Wert : " . $ Epoche. " \\ n";
print " wird zu: " . $ days [ $ wday ] . "," . $ monate [$ Monat ] . " " . $ day . "," . ( $ jahr +1900 );
Dieser Code wird die Epoche Zahl und speichert sie in einer Variablen. Es erstellt dann zwei Arrays , eines für Monate und eines für Wochentage . Die nächste Zeile verwendet die " localtime "-Funktion , um die Epoche Datum in separate Variablen , die jeweils mit verschiedenen Teilen eines Datums und Zeit zu konvertieren. Die letzten beiden Zeilen drucken die Epoche Wert in einer Zeile und dem entsprechenden Datum einschließlich der Wochentag, Monat , Tag des Monats und des Jahres in der nächsten Zeile .
4
Speichern Sie die Perl-Programm -Datei.