eachPath
with d in dir('.')->eachPath
where #d->splitExtension->second != 'lasso'
//let name = #d->lastComponent
let name = #d
order by #name
do {^
#name->removeLeading('.')
#name->removeLeading('/')
#name->removeTrailing('/')
#name->size ? ''+#name->encodeHtml+'
'
^}
?>