glob test
Posted to
tcl
by cjo at Mon Sep 11 15:14:27 GMT 2017
view raw
apply {{} {
time
{
lmap f [
glob
-tails -directory /usr/lib *] {
if
{[
file
type [
file
join /usr/lib
$f
]] eq "link"}
continue
string
range [
file
tail
$f
] 0 2
}
} 200
}}
Recent Posts
tcl by egavilan
10 hours ago
tcl by bch
6 days ago
tcl by Bradipo
6 days ago
tcl by aspect
6 days ago
tcl by Bradipo
6 days ago
tcl by Bradipo
6 days ago
tcl by Bradipo
6 days ago
lilypond by Bradipo
7 days ago
tcl by cgm
18 days ago
tcl by dandyn
26 days ago
Submit
New paste
Documentation
From Jabber