perl打印日志的时间格式

最新推荐文章于 2023-02-09 15:41:25 发布

pyj----

最新推荐文章于 2023-02-09 15:41:25 发布

阅读量1.1k

点赞数

分类专栏： perl

perl 专栏收录该内容

35 篇文章

订阅专栏

本篇博客介绍了一个使用Perl编写的脚本，该脚本主要用于处理生物信息学中的FASTA格式文件。脚本中定义了获取系统当前时间的函数，并在运行时打印出了当前的时间戳。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

mnsdev13:scripts> vim FASTA.pl
c01
      1 #!usr/local/bin/perl5 -w
      2 use strict;
      3 use warnings;
      4 use Getopt::Long;
      5 
      6 sub get_log_time
      7 {
      8       my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime();
      9         $year += 1900;
     10           $mon +=1;
     11             my $logdate=sprintf("%04d-%02d-%02d %02d:%02d:%02d",$year,$mon,$mday,$hour,$min,$sec);
     12               return ($logdate);
     13 }
     14 print &get_log_time."\n";
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
~                                                                                                                                  
0mnsdev13:scripts> ls
F.pl*                      FASTA.pk                   f                          oekb_xml_download_url.pl
FAS.pl*                    FASTA.pl*                  fasta.pl                   oekb_xml_parse_load.pl
FASTA.PL                   FASTAFASTA.pl              file/                      pl
FASTA.out                  FASTa.pl                   lianxi.pl
mnsdev13:scripts> perl5 FASTA.pl
2015-08-12 00:56:06
mnsdev13:scripts>