1.作用：從數組中刪除指定的元素
?2.格式：delete $array[index]
?3.實例：#delete
@fruits=("apple","banana","berry","orange");
print "1:@fruits"."\n";

delete $fruits[1];
print "2:@fruits"."\n";

print "3:$fruits[1]"."\n";

delete $fruits[5];
print "4:@fruits"."\n";

$size=@fruits;
print "5:".$size;

4.結果：
1:apple banana berry orange
2:apple? berry orange
3:
4:apple? berry orange
5:4

5.總結：
(1)index的值是從0開始，當index大于數組長度時，函數delete對數組沒影響
(2)元素被刪除后，該位置上的值是undefined的

二、 grep 函數
?1.作用：按某種模式expr去匹配數組array中的每個元素，匹配成功的元素組成一個新的數組，返回該新數組
?2.格式：grep(expr,array);
?3.實例：
@words=("tomataes","tomorrow","patatoes","phantom","Tommy");
$count=grep(/tom/i,@words);
@items=grep(/tom/i,@words);

print "1.$count\n";
print "2.@items";

4.結果：
1.4
2.tomataes tomorrow phantom Tommy

5.總結：
(1)當返回的新數組賦值給一個標量時，該變量保存了新數組的元素個數
(2)當返回的新數組賦值給一個數組時，該變量保存了新數組的所有元素
(3)i選項忽略大小寫