For neo12 - using an array to count unique elements in a sequence.
Posted to
tcl
by kbk at Thu Feb 11 16:42:54 GMT 2010
view raw
%
foreach
value {foo bar grill bar grill grill foo foo} {
incr
count(
$value
)
}
% parray count
count(bar) = 2
count(foo) = 3
count(grill) = 3
Recent Posts
tcl by xharx
2 days ago
tcl by xharx
3 days ago
tcl by xharx
3 days ago
tcl by xharx
3 days ago
tcl by gay
3 days ago
tcl by gay
3 days ago
tcl by gay
3 days ago
tcl by gay
3 days ago
tcl by sebres
4 days ago
tcl by mjanssen
9 days ago
Submit
New paste
Documentation
From Jabber