Skip to content

Commit 84838f1

Browse files
authored
Merge pull request #37 from rwp0/patch-1
ppc0017: Format Examples
2 parents a83c0fd + e166f59 commit 84838f1

File tree

1 file changed

+21
-20
lines changed

1 file changed

+21
-20
lines changed

ppcs/ppc0017-original-build-type.md

Lines changed: 21 additions & 20 deletions
Original file line numberDiff line numberDiff line change
@@ -88,26 +88,27 @@ could be used to provide a compatible polyfill.
8888
Nothing specific predicted.
8989

9090
## Examples
91-
92-
use builtin qw(created_as_number created_as_string);
93-
94-
my $value1 = "1";
95-
my $string1 = created_as_string $value1; # true
96-
my $number1 = created_as_number $value1; # false
97-
98-
my $value2 = 1;
99-
my $string2 = created_as_string $value2; # false
100-
my $number2 = created_as_number $value2; # true
101-
102-
my $value3 = "1";
103-
my $used_as_number3 = 0+$value3;
104-
my $string3 = created_as_string $value3; # true
105-
my $number3 = created_as_number $value3; # false
106-
107-
my $value4 = 1;
108-
my $used_as_string4 = "$value4";
109-
my $string4 = created_as_string $value4; # false
110-
my $number4 = created_as_number $value4; # true
91+
```perl
92+
use builtin qw(created_as_number created_as_string);
93+
94+
my $value1 = "1";
95+
my $string1 = created_as_string $value1; # true
96+
my $number1 = created_as_number $value1; # false
97+
98+
my $value2 = 1;
99+
my $string2 = created_as_string $value2; # false
100+
my $number2 = created_as_number $value2; # true
101+
102+
my $value3 = "1";
103+
my $used_as_number3 = 0+$value3;
104+
my $string3 = created_as_string $value3; # true
105+
my $number3 = created_as_number $value3; # false
106+
107+
my $value4 = 1;
108+
my $used_as_string4 = "$value4";
109+
my $string4 = created_as_string $value4; # false
110+
my $number4 = created_as_number $value4; # true
111+
```
111112

112113
## Prototype Implementation
113114

0 commit comments

Comments
 (0)