Skip to content

Commit 14178a5

Browse files
committed
Add example
1 parent a83f65d commit 14178a5

File tree

1 file changed

+5
-3
lines changed

1 file changed

+5
-3
lines changed

categories/cookbook/01strings/01-13upper-lower-case.pl

Lines changed: 5 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -6,16 +6,18 @@
66
77
=AUTHOR stmuk
88
9-
You have a string and what to upper/lower case it
9+
You have a string and want to upper/lower case it
1010
1111
=end pod
1212

1313
my $string = "the cat sat on the mat";
1414

1515
say $string=$string.uc; # THE CAT SAT ON THE MAT
1616

17-
say $string.=lc; # the cat sat on the mat
17+
say $string.=lc; # the cat sat on the mat
1818

19-
say $string.wordcase; # The Cat Sat On The Mat
19+
say $string.wordcase; # The Cat Sat On The Mat
20+
21+
$string.tc.say; # The cat sat on the mat
2022

2123
# vim: expandtab shiftwidth=4 ft=perl6

0 commit comments

Comments
 (0)