红杉树(ecitnet)的博客

本文是以 Perl DBI Examples 为蓝本，配合 DBMaker 好学易用的特性，以及几个浅显易懂的例 子，希望能够一步步地带领使用者学习 Perl DBI modules 存取 DBMaker 资料库的方法。而原作者 撰写主要原动力是希望藉由这篇文章的问世，以降低 DBI mailing list 中一再重出现的 FAQ。 读完本文之後，我们就能学到利用 DBI 建立一个完备的

有时候，一个程序的操作或者配置必须要访问操作系统的环境。Perl提供了两种不同的方式来访问环境变量。你可以使用Perl内置的%ENV散列，或者你可以使用Env模块来访问环境。两种方法都提供了对环境的双向访问，这就意味着对Perl变量的任何改变都会造成环境变量的改变。这些变化会被传递给任何子处理，但是不会在你的脚本退出之后被保留。%ENV散列的使用很简单。%ENV散列的关键是环境变量名；散列

Perl 代有机器庞大的文档库，采用 man 形式存放。如果要查找某一特定的函数，手工查找会非 常困难。但是 perldoc 命令，可以帮你轻松找到所需要的资料： 假设我们要查找 sort 函数的手册，那么： perldoc -f sort 就会告诉你 sort 的用法，如果还有疑问，可以搜索 FAQ： perldoc -q sort perldoc 命令实际上在 .pod(plain ol

lenght EXPRlength 返回EXPR代表的字符集的长度。如果没有输入EXPR，则返回$_的长度。注意length不能用于取得数组或hash的元素个数。请使用“scalar @array”和“scalar key %hash”取得各自的元素个数。注意如果EXPR是Unicode,lenght取得字符集的字符数，而不是字节数。如果要取得内部字符串的字节数，使用“bytes::len

什么是SSH?可能对某些人来说很新鲜吧？ 今天我们就讨论下这个话题吧！    SSH的英文全称是Secure SHell。通过使用SSH，你可以把所有传输的数据进行加密，这样"中间人"这种攻击方式就不可能实现了，而且也能够防止DNS和IP欺骗。还有一个额外的好处就是传输的数据是经过压缩的，所以可以加快传输的速度。SSH有很多功能，它既可以代替telnet，又可以为ftp、pop、甚至ppp提供一

网络编程是一门神秘且复杂的艺术，当然也十分有趣。Perl语言提供了丰富的TCP/IP网络函数，所有这些函数都 直接来源于C语言的socket库函数.  由于Perl语言和C语言的socket库函数在型式和使用方法上都是一样的，因此会使用Perl语言进行Socket编程, 当 然也就会使用C语言进行Socket编程.  下面是Perl语言中有关的socket库函数列表：  函数原型 使用说明 

在Linux下安装PHP,APACHE,MYSQL,PERL的方法[入门教程][PHP技术]本文目的在于帮助那些刚刚入门的朋友，这是一篇颇为详细的安装说明本人全部调试通过，现在正在调试ORACLE部分，到时再与大家共享。1.硬件环境： 硬盘：9.2 G ; 内存：128 M ; 网卡：EEpor100 2.软件 操作系统： RedHat 6.2 3.优化RedHat 6.2

每个人都有不同的学习方法, 下面列举几个供参考:首先,请考虑如下问题: 如果 Perl 是你学的第一个编程语言，推荐先看一些编程基础，流程控制,逻辑和设计的知识. 大家有没有好的中文书籍介绍？ 如果你学过其他语言，那就可以从学习 Perl 的语法开始（Perl语言入门），或者是从 Perl 的自带文档。当你对 Perl 的语法了解后，尝试书中的例子，试着写一些简单的程

线程是10个，写在代码里面了，没有作为参数。#!/usr/bin/perluse threads;    use Net::SSH::Perl;use strict;local $SIG{ALRM} = sub { die "timeout/n"; };sub Usage{        print "This script used to execute command on remote

 awk文本处理总结（入门，中级，高级）   awk处理文本总结 - Alex.Wang            2008-2-19 15:55          作为技术支持工程我们最最经常的工作就是经常碰到要处理文本文件，不管是什么数据库最后都可以导成文本，我们就可以对他进行处理了，这样即使你不是对所有数据库操作都很熟悉也可以对他的数据进行处理了。    我们必须的工具有两个一个是shell

CGI教学:CGI常用环境变量  

dos下ftp上传下载文件 对新手很有帮助！现在让我们输入命令连接FTP服务器：cmd下c:/> ftp ip　　接下来服务器询问你用户名和口令，待认证通过即可。 　　开始上传文件，比如说我们要把本地的d:/index.html传至服务器的根目录中，可以这么键入：　　ftp> put d:/index.html （回车）　　当屏幕提示你已经传输完毕，可以打入相关命令查看一番：　　ftp> dir

近期本人闲来没事做了一个程序自动从一些BT网站上抓取数据并且自动发帖到我自己的论坛上，试用了几个月效果比较好，现在公布源代码供perl爱好者参考，欢迎广大perl爱好者一起沟通交流。分几个程序组成readcokie.pl 获取要上传主机的cookie一次获取永久在主机保存fatie.pl         抓取源主机数据并自动发帖到目标主机history.log   保存抓取过的数据user.txt

Mrtg + rrdtool + 14all.cgi(网络流量的监测)1   配置环境(这里所使用的是Windows XP) 1.1        安装IIS和SNMP(简单网络管理协议)[这里需要使用Windows XP的安装盘] 将Windows XP的安装盘放入光驱中。开始=>控制面板=>添加/删除程序=>添加/删除Windows组件(A),将Internet信息服务

 使用xml—writer#!c:/perl/bin/use XML::Writer;use IO;#open file stream .Param is file name.my $output = new IO::File(">output.xml");  #new a output stream.  my $writer = new XML::Writer(OUTPUT => $ou

 端口和CGI的扫描实现WriteBy: LionD8email:   liond8@eyou.comWebsite: http://liond8.126.com 一. DIY一个端口扫描器之－高级技术端口的扫描技术到现在大致分为两种，一种就是低级传统的扫描器，还有就是高级技术的。今天我们就来讲讲高级技术的原理及其实现在基本代码。    经过测试我们知道正在LI

 昨天晚上遇到这么个问题，客户反映我们的一个页面的排序不正确，对方反映了几次，可是我们就是什么问题都没查出来，看看查询的SQL命令，完全按照要求排序了呀，怎么会不正确呢。对方看我们迟迟无法解决，也是非常着急，并把他们那里出现的错误画面发过来了，于是晚上我抱着试试看的想法，把用户提供的数据输入到我们的系统中，刚开始输了几个，排序完全正常，然后，当我输入了十几条数据后，竟然发现排序确实不正常的。而

#perl -MCPAN -e shellinstall Catalystinstall Bundle::CPANinstall Bundle::LWPinstall Bundle::DBD::mysql mysql_config需要在PATH中force install Template BSD5.5 Perl5.8.8需要forceinstallinstall DBIx

HTML::Parser 简单解释Category: Modules   Keywords: HTML:;ParserHTML::Parser 是一个非常强大的用于处理 html 解析的模块。HTML::Parser 的文档没有一个完整的例子。所以我就把下面的我写在 ShellWeb 里的例子摘取出来，并简单的解释一下。  use HTML::Parser;my $pars

Catalyst 的用户鉴定登陆Category: Catalyst   Keywords: Authentication Catalyst因为最近开始有点闲下来（当然，虽说闲下来也有很多事情要做，比如毕业论文，实习，part-time job 等），于是在刚过去的一个多小时里开始了一直想写的基于 Catalyst 的论坛程序。坦白说，Catalyst 我也有很多地方都不懂，都没试验过

优快云 12月28日消息】 国际消息 Perl编程语言于当地时间圣诞节期间发布了新版本Perl 5.10，这也是从2002年至今这门“广为流传的动态语言”的第一次。Perl 5.10添加了新的语言特性和新改进的Perl 解释器。       Perl 是由 Larry Wall 创造的一门动态程序语言，首次发布于1987 年。在20年的历史里，Perl 借用了多种语言如C ，shell(

这个函数当前在学校没有搞懂, 刚从学校出来时也没搞懂, 不会用他来写多线程程序. 今天有人问我在Perl中如何进行多进程编程, 去Google了一把, 发现境界好象比以前高了, 因为感觉上懂了一些了. 下面是写的一个例子:#!/usr/bin/perl#my $pid = fork();if (!defined($pid)){   print ("Fork process failured!/n"