摘要：
代码：http://xxxxx/cgi/perl-cgi.cgi?name=itech&url=itech.cnblogs.com&p1=test1#!/usr/bin/perl-wT#shouldusestrictandwarnningusewarnings;usestrict;useCGI;#todebugerroruseCGI::Carpqw(warningsToBrowserfatalsToBrowser);#ordebugfromcommandlineby:perl-cwTyourcgi.cgi#ordebugby:tail/var/log/apache/error_ 阅读全文
摘要：
通过flag文件来检测与否在运行。可以加入相关关键字的进程的检测。代码：(简单的csh实例）running_check#!/bin/csh-fif($#argv<2)thenusage:echo"Usage:$0<running_flag><action><timeout>"echo"actionneedbeonevalueof-checkor-delete."echo"defaulttimeoutis0,itmeansnotimeoutlimitation."exit1endifsetrun 阅读全文
摘要：
代码：usestrict;usewarnings;my$test="asdf";print"${test}_test2\n";#constantuseconstant{AAA=>"aaa",BBB=>"bbb",MIN_TOTAL=>12,SCORE_PASS=>90,SCORE_RED=>70,};printAAA;printSCORE_PASS;#twodimesionarraysmy@steps=(["aaa","aaavalue"],[& 阅读全文
摘要：
对任何的函数将标准输出和错误输出重定向到对应的log文件。对任何的函数记录函数运行的时间。代码：#!/usr/bin/perlusewarnings;usestrict;nostrict"refs";subtestLogToStd{print"Teststdout:\n";openLOG,">2.txt";selectLOG;print"justatest\n";#recoverSTDOUTselectSTDOUT;print"justatest2\n";closeLOG;}subtest 阅读全文
摘要：
转自：http://weidagang2046.blog.51cto.com/246444/45923/Perl作为一种脚本语言可以实时地生成和执行代码。这种特性可以把代码的编译推迟到运行时，所以又称为“动态代码”。另外，Perl也如Java、C++一样提供了异常处理机制。本文将初步探讨Perl中实现动态代码和异常处理机制的函数：eval。如有错误不足，欢迎讨论和批评指正。eval函数可以看作是Perl虚拟机，它的参数就是一段Perl代码。利用’perldoc –f eval’可以获取eval函数使用帮助，其中介绍了它的两种使用方式：leval EXPREXPR是一个的表达式，例如：eval& 阅读全文