Help language development. Donate to The Perl Foundation

P5lc zef:lizmat last updated on 2021-09-09

t/03-uc.t
use v6.*;
use Test;
use P5lc;

plan 6;

is uc('foo'), 'FOO', 'did we get a good FOO';
is uc('FOO'), 'FOO', 'did we get same FOO';
is uc(''),       '', 'did we get a good empty string';

with "bar" { is .&uc, 'BAR', 'did we get a good BAR' }
with "BAR" { is .&uc, 'BAR', 'did we get same BAR' }
with ""    { is .&uc, '',    'did we get a good empty string' }

# vim: expandtab shiftwidth=4