好久沒用的 Perl script – 反轉檔名

剛沖好熱騰騰的底片

今天去拿了幾卷沖掃好的底片回來,果然又有幾卷被掃錯了方向,也就是說應該由前往後掃的,卻被由後往前掃,當然在 Lightroom 裡,只要在檢視裡把依檔名排序改成降冪就可以解決顯示順序的問題,但如果是從資料夾裡直接看,順序不對看得就很痛苦,好久以前就有這樣的困擾,所以用 Perl 寫了一個 script,可以把檔名編號反轉。例如:

錯誤的順序: 76320001.jpg 76320002.jpg 76320003.jpg 76320004.jpg
              ↓            ↓            ↓            ↓
正確的順序: 76320004.jpg 76320003.jpg 76320002.jpg 76320001.jpg

看了一下檔案最後編輯的日期是 2011-5-28,已經是快六年前的事了,因為也好久沒有沖掃底片了,有點忘了上次執行它是什麼時候,但沒想到這個 script 還可以正常運作,系統可能都更新好幾次了,也是讓我有點訝異的地方,為了怕以後電腦重灌還是資料不見之類的,放一份到 Gist 上,順便做個記錄。

話說我現在根本完全看不懂 Perl 究竟是在寫什麼鬼了啊! XD

VGHTC Wireless Auto-login for Mac OS X

每次筆電從休眠狀態復原,連上網路後,總要重新輸入 web authentication,用鍵盤輸入是不用花多少時間,但在智慧型手機上就很令人厭煩,於是先找了一個 WLanLogin 的 App,找出 VGHTC 的登入網址和參數,測試成功後,果然方便許多。回過頭來想,如果筆電也能自動登入,那不也很方便嗎?所以參考了這篇 For NTNU 的設定,修改為 VGHTC 的版本:

Read more