shithub: riscv

ref: 744f038e86aef8f30b3c7abead3be5d30e163a2c
dir: /acme/bin/new/

View raw version 
#!/bin/rc

id=`{cat /mnt/acme/new/ctl}
id=$id(1)
cmd = $*
if(~ $#cmd 0) cmd = cat

echo 'name '^`{pwd}^/-^`{basename $cmd(1)} > /mnt/acme/$id/ctl
$cmd > /mnt/acme/$id/body
echo clean > /mnt/acme/$id/ctl