ltxin的博客_perl

perl命令行替换

把文件a.txt中的status_at改为status_at2perl -p -i -e 's/status_at/status_at2/g' a.txt-p 表示匹配文件的每一行-i 表示把替换的结果写回到原文件-e 表示后面的程序都写在一行上一般来说perl -pe 's/status_at/status_

perl 替换

转载精选 2014-07-22 11:17:23 1094 阅读

用Perl在终端上打印彩色字符

如果在使用Perl的过程中，要在终端上打印出彩色字符，可以使用CPAN中的Term::ANSIColor模块。现在简单地介绍一下这个模块的几种使用方法：1）use Term::ANSIColor;color()是把任意数量的颜色属性串成一个用空格分隔的字符串并存到变量color里，然后可以用普通的print方法输出彩色字符串。例如：print color ‘bold blue’;print “Th

perl

转载精选 2014-07-21 22:28:26 2081 阅读

perl 时间戳转换为日期

经常碰到日志文件记录的时间戳为格林威治时间对应的秒数，所以用这脚本转为地球人可以看懂的。use POSIX qw(strftime);my $a=strftime "%Y-%m-%d %H:%M:%S", localtime(123); time函数：返回从1970年1月1日起累计的秒数使用：

日期

perl

strftime

原创 2014-06-25 12:18:14 3335 阅读

TK模块写图形界面中文显示乱码的解决方法。

关于windows下Perl调用TK模块写图形界面中文显示乱码的解决方法。By hdboy | Published: 2005年01月09日我的环境是WIN XP SP2+Activeperl 5.8.6，调用TK模块做界面时中文不能正常显示。如图：后经水木上的大虾chaoslawful (silence)告之：“Tk804以后的版本使用utf-8作为内部字符串编码，中文需要编码成utf-8才能正

tk

转载精选 2013-06-28 16:19:43 2290 阅读

perl 发邮件

1，在不需要认证的smtp服务器上发送邮件 #!/usr/bin/perl -w use Net::SMTP; $smtp = Net::SMTP->new($mail_server); #邮件服务器地址 $smtp->mail($send_user); &nbs

smtp

perl

转载精选 2013-05-06 18:54:30 703 阅读

perl 信号控制

转载1: http://www.php-oa.com/2009/06/09/perl_signal.html 转载2: http://blog.163.com/zhuyu_blog/blog/static/26735153200743072258824/ 参考：http://search.cpan.org/~dlux/Parallel-ForkManager-0.

perl 信号控制

转载精选 2013-02-01 09:48:19 748 阅读

perl日志分析

转载于：http://blog.chinaunix.net/uid-20488859-id-1941150.html #!/usr/bin/perl use strict; use Getopt::Std; use vars qw($opt_d $opt_s $opt_e $opt_k $opt_g %date_format @filename $keyword $regular); s

日志分析

perl

转载精选 2013-01-24 14:24:22 428 阅读

perl时间差计算

perl时间差计算看到网上有很多人在问，perl中计算时间差问题，很多人只介绍一种方法，我把我想到的方法都列一下，希望对大家有帮助。一、time函数 time函数是返回距1970年1月1日0点到现在的秒数： code: #!/usr/bin/perl use 5.12.0; use warnings; use strict; my $now1

perl

转载 2012-09-05 22:03:28 2231 阅读

perl pack和unpack的使用方法

函数名 pack 调用语法 formatstr = pack(packformat, list); 解说把一个列

perl

转载 2012-09-04 19:35:52 1205 阅读

perl LWP:UserAgent用法

perl LWP:UserAgent用法 (2012-02-23 11:08:27) 转载▼ 标签：杂谈 LWP::UserAge

perl

转载 2012-09-03 20:19:17 1029 阅读

官方博客	全部文章	热门标签	班级博客
了解我们	网站地图	意见反馈

鸿蒙开发者社区	51CTO学堂
51CTO	软考资讯

51CTO博客

犹言无心

perl命令行替换

用Perl在终端上打印彩色字符

perl 时间戳转换为日期

TK模块写图形界面中文显示乱码的解决方法。

perl 发邮件

perl 信号控制

perl日志分析

perl时间差计算

perl pack和unpack的使用方法

perl LWP:UserAgent用法