1 2 3 4 5 6 7 8
set files "\)" foreach file $files { touch $file } # shoud not result in a fatal error. find_start p { \) } foreach file $files { file delete -- $file }