diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2012-06-23 09:29:02 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2012-06-23 09:29:02 -0700 |
| commit | e8c1f67ad36996682d3bb5614b3ca3eede7cdc5e (patch) | |
| tree | a0bd888849bfc7b902d222aeb189600aa5c95dc6 /lib/Exporter.pm | |
| parent | 53592368bc35a3b75c2799630c2217ecc669d0e5 (diff) | |
| download | perl-e8c1f67ad36996682d3bb5614b3ca3eede7cdc5e.tar.gz | |
Exporter.pm: long lines in verbatim pod
Diffstat (limited to 'lib/Exporter.pm')
| -rw-r--r-- | lib/Exporter.pm | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lib/Exporter.pm b/lib/Exporter.pm index f92d42d0d4..2c4e451449 100644 --- a/lib/Exporter.pm +++ b/lib/Exporter.pm @@ -264,7 +264,9 @@ where you can't directly call Exporter's import method. The export_to_level method looks like: - MyPackage->export_to_level($where_to_export, $package, @what_to_export); + MyPackage->export_to_level( + $where_to_export, $package, @what_to_export + ); where C<$where_to_export> is an integer telling how far up the calling stack to export your symbols, and C<@what_to_export> is an array telling what @@ -435,9 +437,9 @@ A workaround for this is to call the constants once in a C<BEGIN> block: use Socket ; - foo( SO_LINGER ); ## SO_LINGER NOT optimized away; called at runtime + foo( SO_LINGER ); ## SO_LINGER NOT optimized away; called at runtime BEGIN { SO_LINGER } - foo( SO_LINGER ); ## SO_LINGER optimized away at compile time. + foo( SO_LINGER ); ## SO_LINGER optimized away at compile time. This forces the C<AUTOLOAD> for C<SO_LINGER> to take place before SO_LINGER is encountered later in C<My> package. |