584851044的博客_PERL

perl 抓取网页内容

抓取乐彩网历年排列5数据 use LWP::Simple; use FileOperate;my $src = 'http://www.17500.cn/p5/all.php';my $FileOperate = FileOperate->new();my $FilePath = "C:\\Documents and Settings\\Administrat

perl

抓网页

原创 2014-07-31 23:39:05 2240 阅读

PERL 生成数据

use GetExcelData; use ReadWriteFile; use Cwd;#获取本地路径模块 #获得二维数组的一维全部元素,第三个变量是得到元素的数组引用。 sub GetArrayValue { my($InputPoint,$iGetindex,$GetPoint) = @_; my $count = 0; #print "the array is @$InputPoint\

PERL 生成数据

原创 2014-02-12 17:10:56 596 阅读

PERL 压缩与解压缩模块

package ZipUnzip; #实例化一个对象 sub new { my $class = shift; #一个空的引用 my $ref = {}; #将引用和对象绑定 bless($ref,$class); #返回引用 return $ref; } #压缩文件(注意在桌面调用会失败，不知道为啥？？？？) sub ZipFile { #获得对象引用 my $ref = shift; #获得压

perl 压缩与解压缩

原创 2014-02-12 17:08:10 6159 阅读

PERL FTP模块

package MYFTP; use Net::FTP; sub new { my $class = shift; #一个空的引用 my $ref = {}; #将引用和对象绑定 bless($ref,$class); #返回引用 return $ref; } #FTP下载文件 sub DownLoadFtpFile { my $ref = shift; my $FtpServer = shift

PERL FTP

原创 2014-02-12 17:06:11 1126 阅读

Perl多线程生成一些数据

usethreads;#所用模块：threads#模块中的方法：threads->create（），创建一个新线程；#threads->join()，收割已经创建的线程；#threads->list(threads::all)，返回所有已经创建的线程；#threads->is_joinable()，返回目标线程是否已经完成，等待join；#得到随机数subGetRandom

多线程

perl

生产数据

原创 2013-10-03 11:30:56 792 阅读

Perl Socket通信

服务端：use IO::Socket::INET; use Data::Dumper; use Storable; my $server_port=7899; my $server = IO::Socket::INET->new(LocalPort => $server_port, Type => SOCK_STREAM, Reuse =>

server

通信

Socket

服务端

原创 2013-08-03 11:01:20 1158 阅读 1点赞

Perl 聊天室

如何用PERL编写聊天室服务器程序来源: ChinaUnix博客　日期：2006.05.03 21:55　(共有条评论) 我要评论还是来自Linux知识宝库的文章，什么时候也能写个聊天系统呢，kaka~在这里我将告诉你如何来写一个小型的聊天室服务程序,可能会很简陋,有很多要扩展的地方.先决条件:你必须有很好的Perl编程的知识,一台服务器,安装Perl 5.002或更高的

服务器

Windows

internet

Socket

聊天室

转载精选 2013-08-03 10:56:02 793 阅读 1点赞

perl windows杀进程

use Win32::OLE; use Win32::Process; use Cwd; ##下面枚举机器中正在运行的所有进程信息 $wmi = Win32::OLE->GetObject('winmgmts:\\\\.\\root\\cimv2');##两种方法都可以的 $plist = $wmi->InstancesOf("Win32_Process"); my $di

perl

杀进程

原创 2013-07-21 17:04:36 860 阅读

perl 遍历windows系统拷贝想要的东西

use File::Copy ;sub Digui_GetFile { my $path = shift @_; my $ArrayPoint = shift @_;

windows

perl

递归拷贝

原创 2013-07-14 14:18:31 648 阅读

PERL 文本处理

package FileOperate;sub new{ my $class = shift; #一个空的引用 my $ref = {}; #将引用和对象绑定 bless($ref,$class); #返回引用 return $ref;&n

file

package

return

原创 2013-07-09 19:06:26 1798 阅读

perl EXCEL处理

package GetExcelData;use Win32::OLE; #导入win32 OLE包use Win32::OLE::Const "Microsoft Excel";use Cwd;#获取本地路径模块#数据类型如下所示#$EXCEL->$sheet->

Microsoft

EXCEL

package

return

原创 2013-07-08 19:06:23 1119 阅读

perl编程总结

perl主要有三种数据类型，一个是$保存的变量，一个是@保存的数组，一个是%保存的哈希数组。perl中的变量$$保存的变量在PERL中是不区分任何类型的，也就是说没有数据类型的概念。perl会根据上下语境自动识别。例如 my $value = 10;perl会当做变量来识别。perl中连接两个字符串变量使用的是.号。例如my $first = "i love"; my $sec

字符串

second

原创 2013-07-06 22:20:42 932 阅读 1点赞

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

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

51CTO博客

风清扬song

perl 抓取网页内容

PERL 生成数据

PERL 压缩与解压缩模块

PERL FTP模块

Perl多线程生成一些数据

Perl Socket通信

Perl 聊天室

perl windows杀进程

perl 遍历windows系统拷贝想要的东西

PERL 文本处理

perl EXCEL处理

perl编程总结