rc/bin/ape/dircp

   1 #!/bin/rc
   2 # dircp src dest - copy a tree with ape's tar
   3 switch($#*){
   4 case 2
   5         @{cd $1 && tar cf /fd/1 .} | @{cd $2 && tar xf /fd/0}
   6 case *
   7         echo usage: dircp from to >[1=2]
   8         exit usage
   9 }