9.4

1.perl review

• $string

1. 定义用my：my $str =“./ file.txt”;
2. 打开file的句柄，并导入$：open my $IN, ‘<’, $in or die;

   3. 拼接string：$sr=$sr.$j

• @arr 
• 1.shift
• $element=shift (@data)

1.@data 的第一个元素被剥除了

2.$element 可接收pop出来的

• foreach my $j(@data);

• @ARGV

what？ perl 自带的array，不需要用my 

Why? 人perl 互换，从command line得到数据

how？$n1=$ARGV[0];

• 如何访问@的string元素？ 

$ARGV[0]

• my $data=<STDIN>

What? 

<> read line operator 

why？ 

人perl 交互，从command line得到数据

how？

@ARGV = ("aaa","bbb","ccc");

 while (<>) { # process files aaa, bbb, and ccc 

print "this line is: $_"; 

}

• %data=(‘A’, 45, ‘B’,30)

If ($line=~m/Pattern/)

{

my @column=split(‘’ , $line);

print “$column[2]”;

print “Before: $`\n”; 前 

print “Matched: $&\n”;

print “After: $’\n”; //后

}

$sr=~s/failed/NaN/g;

 $i eq $j;

chop($kok);// remove the last character from input string

=========

第一道

205 

1. 用hash存char和index 

2.构造一个list，将char，替换成这个char第一次出现的index

第二道

219 

单纯地用sliding window会导致timeout

hash_tab好

第三道

228 

如何初跑即过？

1.str/int: str和int的格式一致

2.if/else: if and else 的完备性

3.指针: 同?+边界

4.range：nums[i] 和 i的区别

5.array：len(nums)==0?

第四道

1275

列表生成式法

test = [[-3 for i in range(m)] for j in range(n)]

第五道

235 

脑袋想破了的2小时，最后，binary search tree（BST）==ordered 

左边小，右边大