1
POST_FIX = %w{java jsp html xml properties}
2EXCLUDE_DIR = %w{CVS}
3$displayStr = ""
4$fileReg = ""
5$dirReg = "\\.|\\.\\.|"
6
7def sumLine(fileName)
8 file = open fileName
9 begin
10 while file.gets()
11 end
12 ensure
13 file.close
14 end
15 $.
16end
17
18def iteDir(name, level=0)
19 lines = 0
20 dir = Dir.open name
21 rex = /\. + "java" +$|\.jsp$|\.html$/
22 begin
23 dir.each do |fileName|
24 fileName = dir.path + '/' + fileName
25 if File.ftype(fileName) =~ /directory/
26 if not fileName =~ Regexp.new($dirReg)
27 lines += iteDir(fileName, level+1)
28 else
29 next
30 end
31 elsif fileName =~ Regexp.new($fileReg)
32 lines += sumLine(fileName)
33 end
34 end
35 ensure
36 dir.close
37 end
38 str = ""
39 for i in 0..(level-1)
40 str += "\t|"
41 end
42 if level != 0
43 str += "---"
44 end
45 $displayStr = "#{str}#{name}\t#{lines} lines\n#{$displayStr}"
46 lines
47end
48
49POST_FIX.each do |postfix|
50 $fileReg += "\.#{postfix}$|"
51end
52$fileReg = $fileReg.chop
53
54EXCLUDE_DIR.each do |excludeDir|
55 $dirReg += "^#{excludeDir}$|"
56end
57$dirReg = $dirReg.chop
58
59print "Total #{iteDir("E:/_MyWorkSpace/IDEA_Proj")} lines\n"
60print $displayStr
POST_FIX = %w{java jsp html xml properties}2
EXCLUDE_DIR = %w{CVS}3
$displayStr = ""4
$fileReg = ""5
$dirReg = "\\.|\\.\\.|"6
7
def sumLine(fileName)8
file = open fileName9
begin10
while file.gets()11
end12
ensure13
file.close14
end15
$.16
end17
18
def iteDir(name, level=0)19
lines = 020
dir = Dir.open name21
rex = /\. + "java" +$|\.jsp$|\.html$/22
begin23
dir.each do |fileName|24
fileName = dir.path + '/' + fileName25
if File.ftype(fileName) =~ /directory/26
if not fileName =~ Regexp.new($dirReg)27
lines += iteDir(fileName, level+1)28
else29
next30
end31
elsif fileName =~ Regexp.new($fileReg)32
lines += sumLine(fileName)33
end34
end35
ensure36
dir.close37
end38
str = ""39
for i in 0..(level-1)40
str += "\t|"41
end42
if level != 043
str += "---"44
end45
$displayStr = "#{str}#{name}\t#{lines} lines\n#{$displayStr}"46
lines47
end48
49
POST_FIX.each do |postfix|50
$fileReg += "\.#{postfix}$|"51
end52
$fileReg = $fileReg.chop53
54
EXCLUDE_DIR.each do |excludeDir|55
$dirReg += "^#{excludeDir}$|"56
end57
$dirReg = $dirReg.chop58
59
print "Total #{iteDir("E:/_MyWorkSpace/IDEA_Proj")} lines\n"60
print $displayStrKeystone:
1. Ruby I/O access. Dir and File
2. Regexp & String -> Regexp
3. Some kinds of variables
4. Array operation
Technorati Tags: Ruby 
]]>
1 require 'net/smtp'
2 SMTP_HOST = "192.168.60.99"
3
4 def send(from, to, subject, msg)
5 mail = "To: #{to}\r\n" +
6 "From: #{from}\r\n" +
7 "Subject: #{subject}\r\n" +
8 "\r\n" +
9 msg
10
11 Net::SMTP.start(SMTP_HOST) do |smtp|
12 smtp.send_mail(mail, from, to)
13 end
14 end
15
16 from = "blake@192.168.60.99"
17 to = ["blake@192.168.60.99"]
18 send(from, to, "test", "Just a test!\ntest")
2 SMTP_HOST = "192.168.60.99"
3
4 def send(from, to, subject, msg)
5 mail = "To: #{to}\r\n" +
6 "From: #{from}\r\n" +
7 "Subject: #{subject}\r\n" +
8 "\r\n" +
9 msg
10
11 Net::SMTP.start(SMTP_HOST) do |smtp|
12 smtp.send_mail(mail, from, to)
13 end
14 end
15
16 from = "blake@192.168.60.99"
17 to = ["blake@192.168.60.99"]
18 send(from, to, "test", "Just a test!\ntest")
Notice:
1. 'mail' is the email body, it use "\r\n" to separate the mail header and mail context. So if you only want to send context without header, you should write: "mail = "\r\n" + msg". Otherwise your email will lost the context.
Technorati Tags: Ruby
]]>
鑻ユ偍鏇劇粡鈥滄兂瑕佷竴縐嶇畝鍗曠殑闈㈠悜瀵硅薄鐨勮璦鈥濓紝鎴栬呰涓衡淧erl鐨勫姛鑳借櫧鐒跺ソ鐢紝浣嗗畠鐨勮娉曠湡璁╀漢鍙椾笉浜嗏濓紝鍙堟垨鑰呰寰椻渓isp緋誨垪璇█鐨勬濇兂涓嶉敊錛屼絾鍒板閮芥槸鎷彿鐪熻浜鴻鍘岋紝鏈璧風爜綆楀紡搴旇鎸夌収閫氬父鐨勬牱寮忎功鍐欌濄傞偅涔堬紝Ruby鎴栬鑳借鎮ㄦ弧鎰忋?/FONT>
褰掔撼浠ユ潵錛孯uby鏈変互涓嬩紭鐐廣?/FONT>
- 瑙ｉ噴鍣?/STRONG>
- Ruby鏄В閲婂瀷璇█錛屽叾紼嬪簭鏃犻渶緙栬瘧鍗沖彲杞繪澗鎵ц銆?/FONT>
- 鍙橀噺鏃犵被鍨?/STRONG>
- Ruby鐨勫彉閲忔病鏈夌被鍨嬶紝鍥犳涓嶅繀涓洪潤鎬佺殑綾誨瀷鍖歸厤鑰岀儲鎭箋傜浉搴斿湴錛岄敊璇鏌ュ姛鑳戒篃鍙樺急浜嗐?/FONT>
- 涓嶉渶瑕佸彉閲忓０鏄?/STRONG>
- 鎵鏈夊彉閲忓潎鏃犻渶澹版槑鍗沖彲绔嬪嵆浣跨敤銆傚彟澶栵紝浠庡彉閲忓悕鍗沖彲鍒ゆ柇鍑烘槸浣曠鍙橀噺錛堝眬閮ㄥ彉閲忥紝鍏ㄥ眬鍙橀噺錛屽疄渚嬪彉閲忥級銆?/FONT>
- 璇硶綆鍗?/STRONG>
- 璇硶姣旇緝綆鍗曪紝綾諱技Algol緋昏娉曘?/FONT>
- 涓嶉渶瑕佸唴瀛樼鐞?/STRONG>
- 鍏鋒湁鍨冨溇鍥炴敹錛圙arbage Collect錛孏C錛夊姛鑳斤紝鑳借嚜鍔ㄥ洖鏀朵笉鍐嶄嬌鐢ㄧ殑瀵硅薄銆?/FONT>
- 涓鍒囬兘鏄璞?/STRONG>
- Ruby浠庝竴寮濮嬪氨琚璁℃垚綰補鐨勯潰鍚戝璞¤璦錛屽洜姝や互鏁存暟絳夊熀鏈暟鎹被鍨嬩負棣栫殑鎵鏈変笢瑗塊兘鏄璞★紝瀹冧滑閮芥湁鍙戦佷俊鎭殑緇熶竴鎺ュ彛銆?EM>錛堣繖鏂歸潰榪濲ava閮戒笉濡俁uby錛?/FONT>
- 綾伙紝緇ф壙錛屾柟娉?/STRONG>
- Ruby褰撶劧鍏鋒湁闈㈠悜瀵硅薄璇█鐨勫熀鏈姛鑳姐?/FONT>
- 鐗規畩鏂規硶
- 鍙悜鏌愬璞℃坊鍔犳柟娉曘備緥濡傦紝鍙互鎶奊UI鎸夐挳琚寜涓嬫椂鐨勫姩浣滀綔涓烘柟娉曡榪頒笅鏉ワ紝榪樺彲浠ョ敤瀹冩潵榪涜鍘熷瀷搴擄紙prototypebase錛夌殑闈㈠悜瀵硅薄緙栫▼錛堟湁浜鴻繖涔堝共鍚э級銆?/FONT>
- 鐢ㄦā鍧楄繘琛屾販鍚堟彃鍏ワ紙Mixin錛?/STRONG>
- Ruby鏁呮剰鑸嶅純浜嗗閲嶇戶鎵匡紝浣嗘嫢鏈夋販鍚堟彃鍏ュ姛鑳姐備嬌鐢ㄦā鍧楁潵瓚呰秺綾葷殑鐣岄檺鏉ュ叡浜暟鎹拰鏂規硶絳夈?/FONT>
- 榪唬鍣?/STRONG>
- 璇ュ姛鑳藉彲浠ュ皢寰幆鎶借薄鍖栥?/FONT>
- 闂寘
- 鍙互灝嗘煇榪囩▼鐗囨瀵硅薄鍖栥傚璞″寲鍚庣殑璇ヨ繃紼嬬墖孌靛氨縐頒綔闂寘銆?/FONT>
- 鍔熻兘寮哄ぇ鐨勫瓧絎︿覆鎿嶄綔錛忔鍒欒〃杈懼紡
- 浠erl涓烘牱鏉垮垱閫犲嚭浜嗗姛鑳藉己澶х殑瀛楃涓叉搷浣滃拰姝ｅ垯琛ㄨ揪寮忔绱㈠姛鑳姐?/FONT>
- 鎷ユ湁瓚呴暱鏁存暟
- 娣誨姞瓚呴暱鏁存暟鍔熻兘鍚庯紝鍙互璁＄畻闈炲父澶х殑鏁存暟銆備緥濡傝綆?00鐨勯樁涔樹篃杞昏屾槗涓俱?/FONT>
- 鍏鋒湁閿欒澶勭悊鍔熻兘
- 閿欒澶勭悊鍔熻兘鍙互浣挎偍緙栧啓浠ｇ爜澶勭悊鍑洪敊鎯呭喌銆?/FONT>
- 鍙互鐩存帴璁塊棶OS
- Ruby鍙互浣跨敤錛圲NIX鐨勶級緇濆ぇ閮ㄥ垎鐨勭郴緇熻皟鐢ㄣ傚崟鐙嬌鐢≧uby涔熷彲浠ヨ繘琛岀郴緇熺紪紼嬨?/FONT>
- 鍔ㄦ佸姞杞?/STRONG>
- 鑻S鏀寔鐨勮瘽錛屽彲浠ュ湪榪愯鏃惰鍏ュ璞℃枃浠躲?/FONT>
浣哛uby涔熸湁涓嬪垪緙虹偣銆?/FONT>
- 鍥犱負Ruby鏄В閲婂瀷璇█錛屾墍浠ラ熷害杈冩參
- 闈欐佹鏌ユ瘮杈冨皯
Technorati Tags: Ruby
]]>
require 'net/http'def fetch(loc, port, url) z=nil h=Net::HTTP.new(loc,port) begin resp, data = h.get(url,z) puts "Code = #{resp.code} #{resp.message}" resp.each {|key, val| printf "%-14s = %-40.40s\n", key, val} p data rescue Net::ProtoFatalError => detail head = detail.data head.each {|key,val| puts "#{key} #{val}"} if head.code=="404" puts "File not Found" elsif head.code=="401" print "Authorization Required\n User name?" gets uname=$_.chomp print "Password?" gets pwd=$_.chomp unpwd=uname + ":" + pwd puts unpwd hval=[unpwd].pack("m") z={'Authorization' => 'Basic ' + hval} retry end rescue SystemCallError puts "Can't connect" endendfetch('m.tkk7.com', 80, '/blake/articles/5471.html')]]>