Perl Data Ora

In questa sezione, si introduce il linguaggio Perl per la data e l'ora di elaborazione.

Perl è in funzione del tempo di elaborazione sono i seguenti:

• 1 funzione time (): Ritorna dal 1 ° gennaio 1970, il numero cumulativo di secondi
• 2, localtime function (): Prendi il fuso orario locale
• 3, gmtime function (): Get GMT

data e l'ora corrente

Diamo la funzionelocaltime (), che restituisce la data e l'ora corrente a parametri un'occhiata.

I seguenti nove simboli che rappresentano data e ora diversi parametri:

sec,     # 秒， 0 到 61
min,     # 分钟， 0 到 59
hour,    # 小时， 0 到 24
mday,    # 天， 1 到 31
mon,     # 月， 0 到 11
year,    # 年，从 1900 开始
wday,    # 星期几，0-6,0表示周日
yday,    # 一年中的第几天,0-364,365
isdst    # 如果夏令时有效，则为真

Esempi di presentazione come segue:

#!/usr/bin/perl
 
@months = qw( 一月 二月 三月 四月 五月 六月 七月 八月 九月 十月 十一月 十二月 );
@days = qw(星期天 星期一 星期二 星期三 星期四 星期五 星期六);

($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime();
print "$mday $months[$mon] $days[$wday]\n";

Esempi di attuazione dell'uscita sopra è:

12 六月 星期天

Se la chiamata diretta di localtime (), che restituisce le impostazioni correnti del fuso orario del sistema, gli esempi sono i seguenti:

#!/usr/bin/perl
 
$datestring = localtime();
print "时间日期为：$datestring\n";

Esempi di attuazione dell'uscita sopra è:

时间日期为：Sun Jun 12 11:27:31 2016

Greenwich Mean Time (GMT)

gmtime () e localtime () è simile, ma restituisce lo standard di Greenwich.

#!/usr/bin/perl

$local_datestring = localtime();
print "本地时间日期为：$local_datestring\n";

$gmt_datestring = gmtime();
print "GMT 时间日期为：$gmt_datestring\n";

Esempi di attuazione dell'uscita sopra è:

本地时间日期为：Sun Jun 12 11:32:14 2016
GMT 时间日期为：Sun Jun 12 03:32:14 2016

Possiamo vedere dall'esempio, la Cina e la differenza di tempo di 8 ore GMT.

formato data e ora

Possiamo usare localtime () elemento funzionale 9 tempo per il formato di uscita del tempo richiesto per sviluppare. output formattato utilizzando la funzione printf ():

#!/usr/bin/perl
 
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime();

printf("格式化时间：HH:MM:SS\n");
printf("%02d:%02d:%02d", $hour, $min, $sec);

Esempi di attuazione dell'uscita sopra è:

格式化时间：HH:MM:SS
11:35:23

New Time Era (Epoch Time)

Possiamo usare la funzione time () per ottenere una nuova era di tempo, la funzione restituisce dal 1 gennaio 1970 il numero cumulativo di secondi. Esempi sono i seguenti:

#!/usr/bin/perl
 
$epoc = time();

print "从1970年1月1日起累计的秒数为：$epoc\n";

Esempi di attuazione dell'uscita sopra è:

从1970年1月1日起累计的秒数为：1465702883

Siamo in grado di produrre un formato ora vogliamo:

#!/usr/bin/perl

($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime();
print "当期时间和日期：";
printf("%d-%d-%d %d:%d:%d",$year+1990,$mon+1,$mday,$hour,$min,$sec);

print "\n";

$epoc = time();
$epoc = $epoc - 24 * 60 * 60;   # 一天前的时间秒数
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($epoc);
print "昨天时间和日期：";
printf("%d-%d-%d %d:%d:%d",$year+1990,$mon+1,$mday,$hour,$min,$sec);

print "\n";

Esempi di attuazione dell'uscita sopra è:

当期时间和日期：2106-6-12 11:49:28
昨天时间和日期：2106-6-11 11:49:28

la funzione POSIX strftime ()

strftime function () può essere formattato in formato volta che vogliamo.

La seguente tabella elenca alcuni dei simboli di formattazione, asterisco indica che si desidera fare affidamento su ora locale:

Esempi sono i seguenti:

#!/usr/bin/perl
use POSIX qw(strftime);

$datestring = strftime "%Y-%m-%d %H:%M:%S", localtime;
printf("时间日期 - $datestring\n");

#  GMT 格式化时间日期
$datestring = strftime "%Y-%m-%d %H:%M:%S", gmtime;
printf("时间日期 - $datestring\n");

Esempi di attuazione dell'uscita sopra è:

时间日期 - 2016-06-12 12:15:13
时间日期 - 2016-06-12 04:15:13