摘要：
9.3 散列的数组:Vsftp:/root/perl/6# cat a3.pl @AoH = ({husband => "barney",wife => "betty",son => "bamm bamm",},{husband => "george",wife => "jane",son =>... 阅读全文
摘要：
use DBI;use Net::SMTP; use HTTP::Date qw(time2iso str2time time2iso time2isoz); # mail_user should be your_mail@163.comsub send_mail{ if (@_ !=... 阅读全文
摘要：
INNODB_LOCKS Table: INNODB_LOCKS 表 包含信息关于每个锁 一个InnoDB 事务已经请求 但是没有获得锁, 每个lock 一个事务持有是堵塞另外一个事务 centos6.5:/root/mysql-5.6.22#mysql -uroot -p'kjk1231... 阅读全文
摘要：
从192.168.11.186 上登录 192.168.11.185 数据库:root 13246 547 0 13:39 pts/1 00:00:00 mysql -uroot -px xxxxxxx -h192.168.11.185进程号 13246zabbix:/roo... 阅读全文
摘要：
zabbix:/root# zabbix_get -s 192.168.2.224 -k "perf_counter[\Processor(_Total)\% Processor Time]"63.146868zabbix:/root# zabbix_get -s 192.168.2.224 ... 阅读全文
摘要：
[root@oadb test]# cat a1.pl use Data::Dumper;my @a=qw/1 3 5 7 9/;push @b ,{@a};print Dumper(@b);print "\n";print $b[0]->{1};print "\n";[root@oadb te... 阅读全文
摘要：
[] 数组引用:Vsftp:/root/perl/6# cat a7.pl use Data::Dumper;my @fields=("aa","bb","cc","dd");$ref=[@fields];print $ref;print "\n";print @{$ref};print "\n... 阅读全文
摘要：
Vsftp:/root/perl/6# cat a5.pl use Data::Dumper;my @arr=qw/a bc d /; my %rec=(); for $field (@arr){ $rec{$field} = $field.33; } print %rec;... 阅读全文
摘要：
9.2 数组的散列9.2.1 数组的散列的组成Vsftp:/root/perl/6# cat a1.pl %HoA = (flintstones => [ "fred", "barney" ],jetsons => [ "george", "jane", "elroy" ],simpsons =... 阅读全文
摘要：
Perl 免费提供许多数据结构，这些数据结构在其他编程语言里是需要你自己制作的。比如那些计算机 科学的新芽们都需要学习的堆栈和队列在 Perl 里都只是数组pop:pop 操作将数组的最后一个元素取出并返回：Vsftp:/root/perl/5# cat a1.pl my @arr=qw/a b... 阅读全文