The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
%TestML 0.1.0

Plan = 9

Label = 'Boolean OK'
True.OK
False.Not.OK
True.Not.Not.OK

Label = 'String OK'
'Text'.OK
''.Not.OK
'0'.OK

Label = 'Number OK'
0.Not.OK
1.OK
42.OK

# XXX List context not yet supported.
# List("x\ny").OK
# List.Not.OK