社区
CGI
帖子详情
perl中用*取代字符串中回车符
hailiang
2000-08-26 09:54:00
还有一个问题,就是怎么在PERL中得到当前时间
...全文
215
4
打赏
收藏
perl中用*取代字符串中回车符
还有一个问题,就是怎么在PERL中得到当前时间
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
4 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
chaska
2000-08-28
打赏
举报
回复
sub GetLocalTime {
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,undef)= localtime(time);
$mon=$mon+1;
if(length($mon)<2) { $mon ='0'.$mon;}
if(length($mday)<2) { $mday ='0'.$mday;}
if(length($hour)<2) { $hour ='0'.$hour;}
if(length($min)<2) { $min ='0'.$min;}
if(length($sec)<2) { $sec ='0'.$sec;}
my $strTime=(1900+$year).'-'.$mon.'-'.$mday.' '.$hour.':'.$min.':'.$sec;
return $strTime;
}
或在程序中系统调用
$localtime=`date '+\%Y-\%m-\%d \%H:\%M:\%S'`;
chaska
2000-08-27
打赏
举报
回复
用time()或用localtime(time)转换,具体看文档
chaska
2000-08-27
打赏
举报
回复
sub GetLocalTime {
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,undef)= localtime(time);
$mon=$mon+1;
if(length($mon)<2) { $mon ='0'.$mon;}
if(length($mday)<2) { $mday ='0'.$mday;}
if(length($hour)<2) { $hour ='0'.$hour;}
if(length($min)<2) { $min ='0'.$min;}
if(length($sec)<2) { $sec ='0'.$sec;}
my $strTime=(1900+$year).'-'.$mon.'-'.$mday.' '.$hour.':'.$min.':'.$sec;
return $strTime;
}
或在程序中系统调用
$localtime=`date '+\%Y-\%m-\%d \%H:\%M:\%S'`;
hailiang
2000-08-27
打赏
举报
回复
谢谢chaska,我没文档可以参考,我还想问如题的问题,谢谢!
一个java正则表达式工具类源代码.zip(内含Regexp.java文件)
9. 不包括特殊字符的匹配 (
字符串
中
不包括符号 数学次方号^ 单引号' 双引号" 分号; 逗号, 帽号: 数学减号- 右尖括号> 左尖括号反斜杠\ 即空格,制表符,
回车符
等 10 匹配非负整数(正整数 + 0) 11 匹配不包括零的...
freemarker总结
其它的运行符可以作用于数字和日期,但不能作用于
字符串
,大部分的时候,使用gt等字母运算符代替>会有更好的效果,因为 FreeMarker会把>解释成FTL标签的结束字符,当然,也可以使用括号来避免这种情况,如:(x>y)> ...
Redis实战视频课程
和Memcached类似,它支持存储的value类型相对更多,包括string(
字符串
)、list(链表)、set(集合)、zset(sorted set --有序集合)和hash(哈希类型)。这些数据类型都支持push/pop、add/remove及取交集并集和差集及更...
php 去除
字符串
的换行符,php去除
字符串
换行符示例代码
php去除
字符串
换行符示例代码发布于 2015-01-20 06:57:11 | 210 次阅读 | 评论: 0 | 来源: 网友投递PHP开源脚本语言PHP(外文名: Hypertext Preprocessor,
中
文名:“超文本预处理器”)是一种通用开源脚本语言。...
(二)
Perl
_标量数据(数字标量、
字符串
标量、内插、特定操作chomp、行输入<STDIN>等)
文章目录一、标量数据—数字标量二、标量数据—
字符串
标量三、标量间的自动转换及常用比较操作符四、常见操作符—行输入、chomp函数、undef、defined函数 一、标量数据—数字标量 标量是
perl
中
最简单的一种数据...
CGI
2,204
社区成员
4,518
社区内容
发帖
与我相关
我的任务
CGI
Web 开发 CGI
复制链接
扫一扫
分享
社区描述
Web 开发 CGI
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章