Plan 9 from Bell Labs’s /usr/web/sources/plan9/sys/lib/samsave
#!/bin/rc file=$1 switch($#*){ case 1 echo -n $file'?' yn=`{read < /dev/cons} if(~ $yn y){ cat > $file } case 2 /bin/echo $file /bin/cat > $file }