diff options
Diffstat (limited to 'pod/perlguts.pod')
| -rw-r--r-- | pod/perlguts.pod | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/pod/perlguts.pod b/pod/perlguts.pod index 00df2550f4..8327db2c41 100644 --- a/pod/perlguts.pod +++ b/pod/perlguts.pod @@ -1450,6 +1450,8 @@ L</Reference Counts and Mortality>): PUSHs(sv_2mortal(newSVuv(an_unsigned_integer))) PUSHs(sv_2mortal(newSVnv(a_double))) PUSHs(sv_2mortal(newSVpv("Some String",0))) + /* Although the last example is better written as the more efficient: */ + PUSHs(newSVpvs_flags("Some String", SVs_TEMP)) And now the Perl program calling C<tzname>, the two values will be assigned as in: |