Plan 9 from Bell Labs’s /usr/web/sources/contrib/rsc/scripts/'chk
#!/bin/rc if(~ $#* 0) grep -v '^[^'']*(''[^'']*''[^'']*)*$' $* if not grep -nv '^[^'']*(''[^'']*''[^'']*)*$' $* /dev/null