sys/lib/samsave

   1 #!/bin/rc
   2
   3 file=$1
   4 switch($#*){
   5 case 1
   6         echo -n $file'?'
   7         yn=`{read < /dev/cons}
   8         if(~ $yn y){
   9                 cat > $file
  10         }
  11 case 2
  12         /bin/echo $file
  13         /bin/cat > $file
  14 }