--- head.p6 ---------------------------------------------
print*(=open@ARGS[0])[0..9]
--- tail.p6 ---------------------------------------------
my@l= =open@ARGS[0];
print@l[(@l>9??@l-10::0)...]
--- rev.p6  ---------------------------------------------
print reverse=open@ARGS[0]
--- mid.p6  ---------------------------------------------
my@l= =open@ARGS[0];
print@l[int((@l-1)/2)..int(@l/2)]
--- wc.p6   ---------------------------------------------
say*(split"",int(7e10+ +*(=open@ARGS[0])))[1..11]