Skip to content

Commit f016b1c

Browse files
committed
Merge pull request #12 from ghost/patch-1
Update cookbook/01strings/01-00introduction.pl
2 parents 35eff2f + 5e49096 commit f016b1c

File tree

1 file changed

+3
-3
lines changed

1 file changed

+3
-3
lines changed

cookbook/01strings/01-00introduction.pl

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -164,7 +164,7 @@ =head1 Strings as numbers
164164
Context sensitivity is the essence of Perl. Keeping this in mind, what
165165
would you expect to be the output string, for the following?
166166
167-
my $string = "1" ~ "1" + 10; # 12 or 21?
167+
my $string = "1" ~ "1" + 10; # 12, 21, or even... "111"?
168168
say $string;
169169
170170
But, "1+1", surrounded by quotation marks, either '' or "", stringifies
@@ -185,7 +185,7 @@ =head1 Strings as numbers
185185
186186
=end pod
187187

188-
my $string = "1" ~ "1" + 10; # 12 or 21?
188+
my $string = "1" ~ "1" + 10; # 12, 21, or even... "111"?
189189
say $string;
190190
say "1 + 1"; # literally: 1 + 1
191191
say eval "1 + 1"; # 2
@@ -367,7 +367,7 @@ =head2 Advanced Interpolation Control
367367
:t :to Interpret result as heredoc terminator
368368
369369
# Raw quoting: no escaping at all (unless otherwise adverbed)
370-
say q:raw(:raw (no interpolation) even backslash has no special meaning: \\ \/;
370+
say q:raw/:raw (no interpolation) even backslash has no special meaning: \\ \/;
371371
say q:0/:0 (no interpolation) even backslash has no special meaning: \\ \/;
372372
say q0/0 (no interpolation) even backslash has no special meaning: \\ \/;
373373

0 commit comments

Comments
 (0)