perl
__U64
这个作者很懒,什么都没留下…
展开
-
perl引用 笔记
perl 引用一个'引用'就是一个指向一个完整列表或完整哈希(或指向其他的东西,比如函数)的标量值先上代码:#!/usr/bin/perlmy @p=(0,1,2,3,4,5);my $pp=\@p;my $t=1;my $tt=\$t;my %h=( 'name'=>'Tom', 'age'=>'3', );my $hh=\%hsub test1()原创 2016-08-05 13:56:10 · 7294 阅读 · 0 评论 -
perl 包 笔记
perl 包的使用perl 包后缀名一般为 .pmperl包里面可以使用所有的perl数据结构,和自定义函数。一般perl包的文件名和包名一致,当然也可以不一致,但那样会不容易维护,.pm文件的末尾用 1; 结束。vi Conf.pm#!/usr/bin/perlpackage Conf;require Exporter;@ISA=qw(Ex原创 2016-08-05 15:58:22 · 7239 阅读 · 0 评论 -
mysql----perl
perl 对mysql的增,删,改,查操作;参考文档代码演示:#!/usr/bin/perluse DBI;use DBD::mysql;my $db_name="test";my $db_server="12.23.0.3";my $db_port="3306";my $db_user="sum";my $db_pwd="sum";#插入语句my $in_sql原创 2016-08-18 15:29:41 · 6832 阅读 · 0 评论 -
Perl 数组 操作符 pop,push,shift, unshift,splice
这几个操作符都会改变数组的内容;1.pop 后端弹出数组的值2.push 后端压入某个值到数组中3.shift 前段弹出数组的值4.unshift 前段插入某个值到数组中5. splice 可操作数组任意位置的值,(可以在任意位置压入,弹出数组的任意个数的值);splice 参数:1. 要操作的数组;2. 开始的位置3原创 2017-03-30 11:26:57 · 4347 阅读 · 0 评论 -
Perl Net::SSH::Expect.pm 包详解
Net::SSH::Expect.pm new():以哈希的方式指定参数:'host'=> 'user' =>'password' =>'port' => 'raw_pty'=> 创建pty1. login() 返回所有的结果;可以根据返回结果判断是否登陆成功;2.send() 发送命令,命令输出结果会保存在缓存中;3.before()原创 2016-12-30 19:19:09 · 2503 阅读 · 0 评论 -
Perl Expect.pm expect()异常、
exp−>Expect::spawn(….);exp->Expect::spawn(….); exp->send(cmd); exp−>expect(exp->expect(timeout ,’-re’,prompt);如果命令的输出非常多时,Expect会一组一组的将返回结果读取到缓存中每次读取2048个字节。每次读取完就追加到缓存,然后用缓存的数据匹配prompt); 如果命令的输出非原创 2017-08-07 13:08:00 · 1297 阅读 · 0 评论 -
perl linux 安装Gtk2.pm
环境: Centos 1. 安装依赖: yum 源配置 yum install gobject yum install pango yum install gtk+-2.0 2.使用CPAN安装: perl -MCPAN -e shell install Glib install Pango原创 2017-08-24 22:28:25 · 1084 阅读 · 0 评论 -
perl LWP::UserAgent
#!/usr/bin/perluse LWP::UserAgent;use HTTP::Request;my $login_url = 'https://domain/login';my $ua = new LWP::UserAgent;my $req = new HTTP::Request GET=> $login_url;$ua->cookie_jar({file=&...原创 2019-04-15 15:20:56 · 526 阅读 · 0 评论