06 2013 档案
摘要:1.数组相等,数组成员相同,位置也相同一般的如果判断@array1等于 @array2a.数组长度相同 $#array1=$#array2, 比较数组长度,不能使用length函数,length只适用string类型数组参数传递,不能直接传递sub compare(){ my $flag=0; my ($first,$second)=@_; if (@$first==@$second) # the number of the array , don't use length() { for(my $i=0;...
阅读全文
摘要:1.q 相当于 单引号' ' 转义字符无效 q可以使用()[] {} // ,,2.qq 相当于" " 转义字符有效 qq可以使用()[] {} // ,,3.qw 相当于 ('' ,'' ,' ')在每一个单词上添加 ' ' 转义字符无效 qw可以使用()[] {} // ,, qq 和qw 区别,qq赋给数组是整体赋给数组的一个元素,而qw则会每个单词算作一个数组元素4.qr 相当于创建正则 qr//5.qx 执行外部程序 相当于`` 1 #!/usr/bin/perl 2 use stri
阅读全文
摘要:1.首先确定是否安装expect/home/root> which expect/usr/bin/expect如果没有安装,先安装一下安装方法: 请参考http://www.cnblogs.com/daojian/archive/2012/10/10/2718390.htmlyour script:#!/usr/bin/expect -f#!/usr/bin/expect -f set ip 16.235.158.92 set password redhat06 set timeout 5 spawn ssh sqdev8@$ip expect { "*yes/no"
阅读全文
摘要:1. 普通变量引用 variable reference 引用就好比C语言的指针,引用变量存储被引用变量的地址。赋值时注意要在变量前加上 \;使用时要多加一个 $ 。 当然,引用也可以成为简单变量,可以使用引用的引用,使用时要记得多加一个$.引用也可以互相赋值 1 #!/usr/bin/perl -w2 my $variable="this is a reference test\n";3 my $refv=\$variable;4 my $refr=\$refv;5 print "this is \$refv:$refv\n";6 print &quo
阅读全文
摘要:linux添加新用户使用 useradd -----create a new user or update default new user information删除用户使用userdel -----delete a user account and related filesuseadd options:-c, --comment COMMENT set the GECOS field for the new user account-d, --home-dir HOME_DIR home directory for the new user account-p, --password P
阅读全文
摘要:1. tr 转换 转换不是替换(tr///==y///)tr/searchlist/replacementlist/用于查找某个一个字符串,并用replacementlist替换,可以使用正则表达式my $str="this Is A teST";$str=~tr/a-z/A-Z/; 把小写转换为大写 会输出THIS IS A TESTs/// optionsg 全局替换i 忽略大小写my $str3="this is a test\n";$str3=~s/t/haha/g; =====>hahahis is a hahaeshahaprint $
阅读全文
摘要:1.使用system函数 运行成功,返回0,运行失败则返回非负整数system("cmd");2.使用qxmy $cmd1=qx/date/;3.使用`` 与qx等效4.使用open函数open(CMD,“ifconfig |”) or die $!my @result=;close(CMD);5.使用readpipe函数使用readpipe函数可以获取外部程序运行的结果,比如运行 ls 会列出当前目录的文件和文件夹,my $result=readpipe("ls ");#!/usr/bin/perluse strict;my $return=syste
阅读全文
摘要:1. index 函数 index 主要用于字符串查找,返回从左->右查到子字符串的起始位置(起始位置0) ,可以带括号,也可以不带。当找不到会返回-1使用方法: index STR,SUBSTR,POSITION index STR,SUBSTR实例:#!/usr/bin/perluse strict;my $str1="Love me, love my dog\n";print "return the first child string location\n";print index $str1,"ove";print &
阅读全文
摘要:1.参数传递 普通模式:参数中没有数组和哈希#!/usr/bin/perl -wuse strict;sub getparameter{ my $i; for( $i=0;$i<=$#_;$i++) { print "It's the "; print $i+1; print " parameter:$_[$i]\n"; }}无论参数有多少个,均能正常传递。调用函数&getparameter($first,$second .. $end)文艺模式:参...
阅读全文
摘要:之前有比较笼统的写过关于自动化的一些思考(一)http://www.cnblogs.com/tobecrazy/archive/2012/12/18/2824248.html那时候刚做自动化不久,对很多问题的认识和感受不够深刻,就现在而言,我依然是自动化测试的一枚新兵蛋子,还有很多的知识需要了解。回顾一下当时只是弄清楚了一个问题 why,为什么要进行自动化测试,自动化主要还是用于regression,对于测试new feature和new bug,毫无意义,接下来是要弄清楚这个问题:how1.自动化测试分类 我的分类标准是工具,根据不同的工具进行分类。 基于GUI的功能测试工具QTP(现UFT
阅读全文
摘要:1.什么是哈希 哈希是perl的一种数据类型,比较类似数组,用于存放数据,包括2部分关键字keys和值value。不同于数组,哈希访问元素的是按照名字访问标量的key=>value.hash 用% 来标示2.hash 操作 a.增加 my %hash; //定义 第一种写法:$hash{'author'}="Young"; #author 是关键字,Young 是value 与数组一样,hash作为整体时候是这样%hash 带标示符%,作为单个元素使用要使用$而不是%第二种写法:my %food=('fruit',"apple
阅读全文
摘要:Mysql数据库基本操作(进入mysql\bin目录下)注意在mysql控制台操作每句后要加分号;初级篇 1、 进入数据库 mysql -u 用户名 -p 密码 2、 导出数据库 mysqldump -u 用户名 -p 密码 数据库名(表名)> 路径 备份.sql 3、 导入数据库 mysql -u 用户名 -p 密码 数据库名< 路径 备份.sql 或者进入mysql,使用source 路径 备份 此方法可以单独导入表 4、 显示所有数据库 show databases; 5、 使用数据库 use 数据库名; 6、 显示所有表 show tables; 7、 创建数据库 crea
阅读全文