摘要: 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;... 阅读全文
posted @ 2013-06-28 23:16 to be crazy 阅读(7159) 评论(0) 推荐(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 阅读全文
posted @ 2013-06-28 22:28 to be crazy 阅读(14518) 评论(0) 推荐(0) 编辑
摘要: 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" 阅读全文
posted @ 2013-06-26 10:55 to be crazy 阅读(530) 评论(0) 推荐(0) 编辑
摘要: 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 阅读全文
posted @ 2013-06-24 16:48 to be crazy 阅读(785) 评论(0) 推荐(0) 编辑
摘要: 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 阅读全文
posted @ 2013-06-24 13:54 to be crazy 阅读(4010) 评论(0) 推荐(0) 编辑
摘要: 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 $ 阅读全文
posted @ 2013-06-17 23:57 to be crazy 阅读(417) 评论(0) 推荐(0) 编辑
摘要: 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 阅读全文
posted @ 2013-06-17 21:23 to be crazy 阅读(1565) 评论(0) 推荐(0) 编辑
摘要: 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 & 阅读全文
posted @ 2013-06-16 00:05 to be crazy 阅读(1360) 评论(0) 推荐(0) 编辑
摘要: 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)文艺模式:参... 阅读全文
posted @ 2013-06-11 16:35 to be crazy 阅读(28489) 评论(0) 推荐(1) 编辑
摘要: 之前有比较笼统的写过关于自动化的一些思考(一)http://www.cnblogs.com/tobecrazy/archive/2012/12/18/2824248.html那时候刚做自动化不久,对很多问题的认识和感受不够深刻,就现在而言,我依然是自动化测试的一枚新兵蛋子,还有很多的知识需要了解。回顾一下当时只是弄清楚了一个问题 why,为什么要进行自动化测试,自动化主要还是用于regression,对于测试new feature和new bug,毫无意义,接下来是要弄清楚这个问题:how1.自动化测试分类 我的分类标准是工具,根据不同的工具进行分类。 基于GUI的功能测试工具QTP(现UFT 阅读全文
posted @ 2013-06-10 22:39 to be crazy 阅读(2900) 评论(0) 推荐(0) 编辑
摘要: 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 阅读全文
posted @ 2013-06-09 13:34 to be crazy 阅读(36232) 评论(0) 推荐(0) 编辑
摘要: 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 阅读全文
posted @ 2013-06-08 10:01 to be crazy 阅读(2822) 评论(1) 推荐(0) 编辑
摘要: 1.获取系统时间 孔乙己说:回字有四样写法,你知道么? 我说: 我不知道,我只知道perl获取系统时间有3种方法(孤陋寡闻) 1. 使用localtime函数 Converts a time as returned by the time function to a 9-element ahash list with the time analyzed for the local time zone. Typicallyused as follows: # 0 1 2 3 4 5 6 7 8 ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isd. 阅读全文
posted @ 2013-05-28 23:03 to be crazy 阅读(2012) 评论(0) 推荐(0) 编辑
摘要: 使用perl统计字数,使用正则表达式和hash首先去掉非显示字符(换行 空格)其次把大写转换为小写word.txt 原文A coal factory in Anhui province. The United States will pursue opportunities to increase coal exports to China, says Platts' Coal Trader International. Provided to China Daily US expected to increase exports to China and Europe as powe 阅读全文
posted @ 2013-05-24 17:34 to be crazy 阅读(2321) 评论(0) 推荐(0) 编辑
摘要: l使用方法下载junithttps://github.com/junit-team/junit/wiki/Download-and-Install使用junitjar包l一个简单的test1.创建类 public class calc { /** * @param args */ public static int add(int first_num,int second_num) //add method { return first_num+second_num; } public static int minus(int first_num... 阅读全文
posted @ 2013-04-15 22:42 to be crazy 阅读(5706) 评论(0) 推荐(5) 编辑
摘要: 插入排序:插入排序是假设数列已经按顺序排列,反复将每一个元素插入,如果待插入数据比所有元素大,就直接放到最后;如果比前置元素小,前置元素后移,直至遇到比待插入小的位置。初始状态,假设数列只有一个元素33第一步将6插入 6比33小 33后移,6插入到33前面第二步将-5插入 -5 比33小 33后移 -5比6小 6后移第三步 将59插入 55 比-5 6 33 都大,直接插入在最后边第四步 将-12插入 -12比 -5 6 33 59 都小 12 插入最前端View Code #include<iostream>//insertion sort using namespace std 阅读全文
posted @ 2013-03-26 20:39 to be crazy 阅读(886) 评论(0) 推荐(0) 编辑
摘要: 选择法排序:找出最小值,依次第一个位置互换。例如数组:33,6,-5,59,-12第一次遍历: 找出最小值-12与数组第一个值33互换第二次遍历:找出除数组第一个值以外的剩下的最小值-5,与数组第二个位置的值6互换......外部循环设定遍历次数,数组5个元素最多需要4次遍历,因为每次决定数组的一个位置,最后一个不用比较。(n-1)#include<iostream>//selection sort using namespace std;void display(int array[], int n){ for(int count=0;count<n;count++) // 阅读全文
posted @ 2013-03-14 22:55 to be crazy 阅读(993) 评论(0) 推荐(0) 编辑
摘要: 冒泡排序冒泡法排序就是将需要排序内容从第一个元素开始,与相邻元素比较大小,将较大的/较小的放到后边,第一次遍历最后一个元素是最大/最小。依次类推,第二次将倒数第二大/第二小元素放到倒数第二的位置。直到全部元素按照顺序排列。比如5个元素:第一次遍历 需要比较4次(相邻元素之间比较,最坏情况)第二次遍历 比较3次...第四次遍历 比较1次所以算法复杂度是n*(n-1)/2Bubble sort 1 #include<iostream> 2 using namespace std; 3 void display(int array[], int n) 4 { 5 for(int cou. 阅读全文
posted @ 2013-03-13 21:43 to be crazy 阅读(851) 评论(0) 推荐(3) 编辑
摘要: 1.设置verbose在脚本添加 set -x/v-x xtrace确认代码是否正确运行+x 不再显示verbose2.大小写转换 $test=`echo $test|tr [a-z] [A-Z]`3.系统时间使用declare -a DATE=(`date +"%S %M %k %d %m %Y"`)或使用 $(date +%Y%m%d) 年月日 $(date +%H%M%S) 时分秒 $(date +%s)从1970年以来的秒4.根据调试层次控制输出debug=2test $debug -gt 0 && “A little data”test $debu 阅读全文
posted @ 2013-03-03 23:34 to be crazy 阅读(1377) 评论(0) 推荐(0) 编辑
摘要: 1. 正则表达式email:=~ /^([0-9a-zA-Z]{3,}|[0-9a-zA-Z]+(-|_)?[0-9a-zA-Z_-]+\.?[0-9a-zA-Z]+)\@[0-9a-zA-Z]+\.[0-9a-zA-Z]+(\.\w+)?/;ip =~/([0-9]{1,3}\.?){4}/;. Match any character except a wrap character.\w Match "word" character and [_0-9a-zA-Z]\WMatch non-word character [^_0-9a-zA-Z]\s Match white 阅读全文
posted @ 2013-01-05 00:04 to be crazy 阅读(1556) 评论(0) 推荐(0) 编辑
摘要: 今天一位搞财务的mm问我excel计算工龄的问题,我想了想,还真不会啊。搞测试的,写case,报进度,统计bug一般都是用excel,还真没弄过计算工龄日期生日之类的。她的要求是:居然不会,想了半天想到2个方案:1、用perl写个脚本给她;2、把信息导入数据库,用select 语句查询再把结果导出;后来仔细想想,这种不符合她的要求,人家要去用excel解决。于是,我就开始查找excel function,关于日期处理的。在一般的编程语言与数据库中,都有取得当前日期与字符串处理的函数,于是我就按照这个思路查找。(她没要求计算出3.5年工龄这样的,只要求给出整年整月的)excel取得当前日期的函数 阅读全文
posted @ 2013-01-02 12:39 to be crazy 阅读(2402) 评论(0) 推荐(0) 编辑
摘要: Oracle blob字段类型 文件读写实例准备环境:pl/sql java JDK Oracle JDBC driver创建blob_test表create table blob_test(id number,name varchar(50),word blob)先插入空白数据然后执行更新Code:package sql; //JDBC connect management for Oracle require Oracle Jdbc driverimport java.sql.Connection;import java.sql.DriverManager;public class DBC 阅读全文
posted @ 2012-12-22 01:30 to be crazy 阅读(20561) 评论(0) 推荐(0) 编辑
摘要: 时至今日,进项目组已经半年了,对自动化测试也有了更深刻的认识和理解。 为什么要进行自动化测试?要回答这个问题,先了解一下测试背景。我们项目所使用的软件开发模型是agile,agile开发的scrum模型,整个大项目分成一个个小team,每个team都有一个scrum master。Scrum master 根据每个人的情况安排任务,制定sprint plan。我们的测试有两条线,一条是main line ,一条是branch line,平均每个sprint是一个月(22个工作日),差不多每周要出2个build,每个sprint大概4-7个build。版本迭代非常快,周期短;对于QA,每个人要. 阅读全文
posted @ 2012-12-18 22:51 to be crazy 阅读(5157) 评论(10) 推荐(2) 编辑
摘要: 昨天参加了一个测试沙龙,因为是免费的主办方嵌入太多太多的广告,我对此十分反感,于是在他们演讲中就使用了我在学校惯用的手段,打瞌睡,以此进行报复性抗议。这个沙龙的影响力还是很可观的,所以来了不少测试界的高手。其中有百度、SAP、EMC、有中国金融期货交易所的同行。 当然,还是有收获的,我是一个既能在失望中看到希望有能在得意时注意危机的人。于是在整个沙龙结束后,我就若无其事的留下来,等着与各位前辈一起交流,我称之为扯扯淡,他们称之为吐槽。我是一个心直口快的人,表达自己的想法从来都是不假思索。在面对那几位大佬直接说,今天的沙龙不怎么样,对我来说毫无价值,因为他们是在做产品推介会,一点都不是我想要听. 阅读全文
posted @ 2012-11-25 22:20 to be crazy 阅读(843) 评论(0) 推荐(0) 编辑