::  Over/write to location, usage :into %/foo/txt 'Contents'
!:
::::
  ::
|_  [hid=hide ~]
++  peer  ,_`.
++  poke-into-args
  |=  [ost=bone you=ship pax=path dat=cage ~]
  :_  +>.$
  :*  [ost %pass /into %c %info our.hid (foal pax dat)]
      [ost %pass / %g %cide %$]
      [ost %give %nice ~]
      %+  turn  (~(tap by sup.hid))
      |=  [ost=bone *]
      :^  ost  %give  %rush
      :-  %tang  :_  ~
      leaf/"written"
  ==
--