Een tijdperkwaarde is een Unix tijdstempel dat het aantal seconden dat is verstreken sinds 1 januari 1970 berekent . Deze waarde maakt het eenvoudig om berekeningen uit te voeren op de data in verschillende programmeertalen . In Perl , de " tijd " -functie om het tijdperk date te krijgen bel je . U kunt deze waarde afdrukken op het scherm , op te slaan in een variabele , of converteren naar een leesbaar date met arrays en de functie " localtime " Perl . Instructies
1 Open een Perl-programma bestand . Plaats de cursor waar u de datum wilt tijdperk en tijd kopen van 2 Type "print tijd ; " krijgen . ( Zonder aanhalingstekens ) . Deze code roept de tijd functie om het tijdperk tijd te krijgen , drukt het vervolgens naar het scherm
Type 3 de volgende code :
mijn $ tijdperk = tijd ; < . br > mijn @ maanden = ( " jan" , " februari " , " Mar" , " april " , " mei " , " juni " , " juli " , " augustus " , " september " , " oktober " , " november " , " december " ) ;
mijn @ dagen = ( "Sun " , " ma " , " di " , " wo " , " do " , " Vrij " , " zat " ) ; < br mijn > ( $ sec , $ min , $ uur , $ dag , $ maand , $ jaar , $ wday ) = ( localtime ( $ tijdperk ) ) [ 0,1,2,3,4,5,6 ] ; print " Epoch waarde : "
. $ tijdperk . " \\ n " ; druk
" Converteert naar : " . $ dagen [ $ wday ] . ' , ' . $ maanden [ $ maand ] . " " . $ dag . ' , ' . ( $ jaar 1900 ) ;
Deze code krijgt het tijdperk nummer en slaat deze op in een variabele . Het creëert dan twee arrays , een voor maanden en een voor weekdagen . De volgende regel maakt gebruik van de " lokale tijd " functie om het tijdperk datum omzetten in afzonderlijke variabelen , elk met verschillende onderdelen van een datum en tijd . De laatste twee regels af te drukken het tijdperk waarde op een lijn en de bijbehorende datum inclusief de dag van de week , maand , dag van de maand en het jaar op de volgende regel .
4 Sla het Perl-programma bestand . < Br >
|
