Plan 9 from Bell Labs’s /usr/web/sources/contrib/stallion/rc/list/of
#!/bin/rc # list/of - print path for upas patternfile if(~ $#* 0){ echo >[1=2] usage: list/of name exit usage } if(! test -f /mail/box/$user/$1){ echo >[1=2] of: ''''$1'''': list does not exist exit nolist } echo /mail/box/$user/$1