Print PATH Entries (no duplicate)

#!/usr/bin/env tclsh

set path [lsort -unique [split $::env(PATH) ":"]]

foreach p $path {
    puts $p
}

這只是一個簡單的練習。在取得目前的 PATH 環境變數列表以後使用 lsort 排序並且將重覆的部份移除 (-unique option)，然後印出來。