# Pastebin kzxjjPhG
MacBook-Pro-de-Fernando:rakudo fernando$ cat foo.t 
use Test;
plan 1;
todo 1;
flunk '\\# OK';
MacBook-Pro-de-Fernando:rakudo fernando$ prove -e './perl6 -Ilib' -vlr foo.t 
foo.t .. 
1..1
not ok 1 - \ \# OK # TODO 1

# Failed test '\ \# OK'
# at foo.t line 4
ok
All tests successful.
Files=1, Tests=1,  0 wallclock secs ( 0.02 usr  0.01 sys +  0.14 cusr  0.02 csys =  0.19 CPU)
Result: PASS