$sel = `ls -sl`;
select -clear;
SelectToggleMode;
for ( $s in $sel ) {
	string $buff[];
	tokenize $s "." $buff;
	if ( size ( $buff ) == 2 )
	select -r $buff[0];
}