let
chmod opts file =
Cmd
(
S
[
A
"chmod"
; opts;
Px
file])