陣列,列表練習--小遊戲的例子
檔案練習
模式匹配練習--一道包括陣列、檔案和模式匹配的綜合練習題:
編寫乙個短程式,是他能夠執行下列操作:
1)開啟乙個檔案
2)將所有檔案行讀入乙個陣列
3)從每行中取出所有單詞
4)找出至少擁有4個連續子音或非原因字元的所有單詞(比如"thoughts" 或者"yardstick")
open(mfile,"file.txt");
@lines=;
close(mfile);
foreach (@lines)/i)
grep函式
語法:grep(/pattern/,@array)
說明:將合文書處理模式(regular expression)的陣列元素找出來。
示例:@array=("one","on","in");
$count=grep(/on/,@array); #這時$count=2
@result=grep(/on/,@array);#這時@result=("one","on");
eg.1 @array=qw(grephound bloodhound terrier mutt chihuahua);
@result=grep(s/hound/hounds/,@array);
foreach $tmp (@result){
print $tmp." ";
@result=grep(length($_)>5,@array);
foreach $tmp (@result){
print $tmp." ";
指令:push
語法:push(@array,$string)
說明:在陣列@array的最後附加新的元素 ($string)到陣列@array中。
示例:@array=("one","two"); push(@array,"three"); #這時$@array=("one","two","three")
hash相關:
指令:keys
語法:keys(%array)
說明:取出關聯陣列%array中全部的key。
示例:%name=(1,"mike",2,"michael"); @readkey=keys(%names); #這時@readkey=(1,2);
指令:values
語法:values(%array)
說明:取出關聯陣列%array中全部的value。
示例:%names=(1,"mike",2,"michael"); @readval=values(%names);
#這時@readval=("mike","michael");
參考:
perl指令碼練習
題目 12 34 56 78 24 65 87 90 76 11 67 87 100 89 78 99 求出文字中數字的最大 小值 我看很多的朋友都用shell的awk實現了,但本人對awk不是很了解,試著用perl簡單的寫了一下,也能實現 code usr bin perl w use stric...
練習0006 最重要詞頻
詳細題目在上。此次是0006題,統計出乙個資料夾下每個文字檔案最為重要的詞。總的思路是讀取檔案目錄,將所有檔案加至列表中,然後對列表每個檔案中的文字進行過濾,使用字典計算詞出現次數,然後對字典排序,將出現次數最多的詞存到乙個列表中,最後輸出該列表。coding utf 8 import os imp...
為什麼練習很重要?
當你認識到1 1 2時,你需要去練習它嗎?它是乙個元知識,是固定的,原則性的。你對它的整個學習過程,到意識到它的層面,就足夠了。如若是由此發展出來的加法運算呢?它是一種方法,一種推理過程,它有兩個可變的引數。你需要練習,以使你的大腦遇見這兩個可變引數中的某些組合形式,以此總結某些規律,並運用規律來提...