Closed bounceme closed 6 years ago
{ find . -type d -maxdepth 1 | sed -e 's/$/\//' && find . \! \( -type d \) -maxdepth 1 ; } | sed -e 's/^\.\///' -e '/^$/d'
just to remember
going to be tough escaping this in tcl
it was
{ find . -type d -maxdepth 1 | sed -e 's/$/\//' && find . \! \( -type d \) -maxdepth 1 ; } | sed -e 's/^\.\///' -e '/^$/d'
just to remember