首页
登录 | 注册

perl 语句记录

1. 显示时间
  1. ($sec,$min,$hour,$day,$mon,$year,$weekday,$yeardate,$savinglightday) = (localtime(time));
  2.     $sec = ($sec < 10)? "0$sec":$sec;
  3.     $min = ($min < 10)? "0$min":$min;
  4.     $hour = ($hour < 10)? "0$hour":$hour;
  5.     $day = ($day < 10)? "0$day":$day;
  6.     $mon = ($mon < 9)? "0".($mon+1):($mon+1);
  7.     $year += 1900;
  8.     $today = "$day.$mon.$year|$hour:$min:$sec";
  9.     print $today;



相关文章

  • 作为网络工程师,日常工作大多数时间都是在用telnet同交换机.路由器等网络设备打交道.如果说perl中有什么好用的模块,当然得提Net::Telnet.Net::Telnet功能全面,对于日常管理写个针对几台.几十台交换机的小程序还是不错 ...
  • 通过cpan安装Net::SSH::Perlcpan>install Net::SSH::Perl在安装过程中,本人遇到了一些问题,记录如下因为cpan对其它软件的依赖性,要求软件版本的不能过低,所以先升级一下这两个模块:cpan&g ...
  •  <写给Java开发者的10分钟Perl指南>  原文见:http://www.programcreek.com/2012/09/10-minutes-perl-tutorial-for-java-developer/  本文并 ...
  • 初学者很多时候代码混乱,不是语法不熟,而是语义关系没理清,很多教参书只重语法而对语义关系缺乏应有的重视,所以就在这里稍作补充.比如if语句的条件关系. 格式一: if(a){ if(b){ } ... } 这种格式结构中,条件a与b是&qu ...
  • 笔记之一       Ruby之所以设计模块的概念,在于弥补传统的C之类语言的模块概念的缺失.在软件设计中,模块化体现很多很有用,它直接关系到软件设计的效率和灵活性.C中没有明显的模块的概念,就要由程序员自己通过软件的手段来强化模块概念,通 ...
  • 李哲 - APRIL 28, 2015  return,break,next 这几个关键字的使用都涉及到跳出作用域的问题,而他们的不同 则在于不同的关键字跳出去的目的作用域的不同,因为有代码块则导致有一些地方需要格外注意. return 常 ...

2019 unjeep.com webmaster#unjeep.com
12 q. 0.013 s.
京ICP备10005923号