Perl directory list - List all files that match a filename pattern

Reference:
http://alvinalexander.com/blog/post/perl/generate-all-html-files-in-directory

#!/usr/bin/perl -w

opendir(DIR, ".");
@files = grep(/\.html$/,readdir(DIR));
closedir(DIR);

foreach $file (@files) {
   print "$file\n";
}

Windows 7 TCP/IPv4 is disable

狀況：
Windows 7 網路中斷，顯示為 "沒有可用的連線"。
網路卡的狀態是已啟用。
網路和共用中心的狀態是 相依服務或群組無法啟動。
用Notebook測試網路線可正常連線。
網路卡的TCP/IPv4內容按鍵沒辦法按。

2014/10/20 理髮

到交大理髮。
老闆娘說我的頭髮變少了....

2014/10/18 ~ 19 生病記錄

10/18 (六) 晚上肚子感覺不舒服。
10/19 (日) 凌晨腹瀉。早上起床感覺肚子還好就照原定記畫去跑步。跑的時候感覺使不上力，跑起來比之前慢。洗澡後出現感冒症狀，眼睛發熱、偏頭痛、腰酸背痛。趕快吃科學中藥葛根湯(但這次沒能閃過去)，早午晚各吃一次，晚餐後趕緊洗澡睡覺。
10/20(一)早上感覺似乎快好了。

結論：年紀大了還是不要逞強。

2014/10/18 公司家庭日 新竹老頭擺農庄

android remote desktop mouse right click

Reference:
http://technet.microsoft.com/en-us/library/dn473010.aspx

Mouse mode	Mouse operation	Gesture
Direct Touch	Left click	1 finger tap
Direct Touch	Right click	1 finger tap and hold
Direct Touch	Zoom	Use two fingers and pinch to zoom in or move fingers apart to zoom out
Mouse Pointer	Left click	1 finger tap
Mouse Pointer	Left click and drag	1 finger double tap and hold, then drag
Mouse Pointer	Right click	2 finger tap
Mouse Pointer	Right click and drag	2 finger double tap and hold, then drag
Mouse Pointer	Mouse wheel	2 finger tap and hold, then drag up/down

2014/10/2 健身筆記

上個月看到這一篇 什麼是全球最夯的「TABATA間歇訓練」?
一天只要運動四分鐘就有成效，找到這段影片跟著做。

經過一個月，發現體脂肪上升了。
2014/8/30 體重65.2KG、體脂16.7%
2014/9/27 體重64.5KG、體脂18.5%
宣告實驗失敗~~~

2014/9/28 改回原來的運動 (伏地挺身、健腹輪、深蹲)，發現無法做到上個月的強度。
只好重新來過，慢慢增加強度。

Windows 7 啟用 休眠

http://support.microsoft.com/kb/2349660/zh-tw

如果沒有 "允許混合式睡眠"，請檢查 BIOS 的 Power 設定，ACPI 必須設定為 S3 以上。