I don't know if it's implemented yet, but you should be able to make that last line:
say@l[$i...];
Again, Pugs knows better...:-) It does not seem to work with the current svn build.
say@l[(@l>9??@l-10::0)...];
Yes, I tried similar solution myself, too, but Pugs does not let me to incorporate the ternary operator into the array index. What is pretty interesting playing around with Pugs is that usually it proves itself much more flexible in parsing complex Perl 6 statements than I would have expected it, but every now and then even the simplest ideas fail with some obscure error messages. It is getting better all the time, though.