收录日期:2018/11/16 16:19:55 时间:2016/05/23 01:58:18 标签:CGI
今天兄弟我第一次写cgi,头头催着要cgi输出当前日期的sample,那位能够帮帮忙

日期格式要求:2003/01/05 07:06:08
忘记说了我这里的环境是iis+perl
sub system_time {
my ($sec, $min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime();
$mon++;
$year=$year+1900;
my $systime="$year.$mon.$mday.$hour.$min.$sec";
                  return $systime;
}
sub system_time {
my ($sec, $min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime();
$mon++;
$year=$year+1900;
my $systime="$year/$mon/$mday/  $hour  $min  $sec";
                  return $systime;
}
我试着写了一页代码如下:

print "Content-type:text/html\n\n"; 

use Time::localtime;

sub system_time {
my ($sec, $min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime();
$mon++;
$year=$year+1900;
my $systime="$year/$mon/$mday/  $hour  $min  $sec";
                  return $systime;
}

print system_time();

exit;

-----------------------------------------------------------------------------
结果如下:
1900/1//      Time::tm=ARRAY(0x18a2520)
localtime() 只是一个转换函数,还要取的当前的时间才行。
当前的时间是 time .

把里面的 localtime() 换成 localtime(time)
#!/usr/bin/perl
($sec, $min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)  = localtime(time);
print "秒: $sec\n";
print "分: $min\n";
print "時: $hour\n";
print "一個月的第幾天: $mday\n";
print "月: $mon 範圍是 0-11,而一月為 0\n";
print "距離 1900 年的第幾年: $year\n";
print "一周內的第幾天: $wday  範圍是 0-6,而星期日為 0\n";
print "一年內的第幾天: $yday\n";

# 如果我只想要當天的日期,
($_,$_,$_, $mday, $mon, $year, $_,$_,$_) = localtime(time);
$year = $year + 1900;
$mon = $mon + 1;
print "今天是西元 $year 年 $mon 月 $mday 日\n";

我们在三个项目外包!!!!!!!!!! CDialogBar中加入ComboBox控件,如何初始化ComboBox控件 求数据库查询实现问题(急呀) tomcat5.5 和JDK问题 求 Flash+ASP 开发的在线卡拉屋系统 大家好,请问JFrame怎样实现MDI窗体? jsp如何注消用户 开源啥时能够在中国沸腾 在Mfc中添加函数,对函数的参数有什么要求? C#类库 C++能用吗 MFC中某个类中添加函数时对函数的参数有要求吗? 请问用c#如何判断一个字符串在另外一个字符串中是否存在的难题,请指教! 请问有没有在Linux下开发J2EE的前辈啊 本人研究计算机30年,有什么问题可以问我 请问.net2.0中的SmtpMail在哪个名字空间下? 如何用MathImge控件画出一堆煤的三维图形,500分相送. 想学习网络知识!!!!!!!!!! 寻找一个在 win2k 上的纯文本的浏览器 怎么把一个字符型变量赋值给TreeNode变量? 我想通过程序的方式 把 aspx页面在服务器端缓存60秒,为什么不行呢,大家试试!~!1 请教VB.NET编辑器中的一个问题 有个问题问大家 ASP.NET中怎么实现PHP的eval功能? 时间Date间隔计算(如何计算现在的时间与表中字段timeA的时间间隔???),求教! 在SDI程序中,如何设定CAPTION的内容为固定的文本? 如何提高Canvas的响应手写笔点击的速度? 怎么样把数据库里的所有数据全部显示出来 请教一个简单的逻辑问题 请教一个简单的逻辑问题 请问windows2000遭到syn flood攻击怎么防御,多谢