X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fsubs.pm;h=aa4c7e751e0524d80961c89c6ea2494ec198de2a;hb=ee85b803feacbb40e8592bf6e4ffe4e533862c00;hp=8b5835770fa5c8cf00a93d49e4c5023b0d6abbdc;hpb=a0d0e21ea6ea90a22318550944fe6cb09ae10cda;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/subs.pm b/lib/subs.pm
index 8b58357..aa4c7e7 100644
--- a/lib/subs.pm
+++ b/lib/subs.pm
@@ -1,8 +1,29 @@
 package subs;
 
-require 5.000;
+=head1 NAME
+
+subs - Perl pragma to predeclare sub names
+
+=head1 SYNOPSIS
+
+    use subs qw(frob);
+    frob 3..10;
+
+=head1 DESCRIPTION
 
-$ExportLevel = 0;
+This will predeclare all the subroutine whose names are 
+in the list, allowing you to use them without parentheses
+even before they're declared.
+
+Unlike pragmas that affect the C<$^H> hints variable, the C<use vars> and
+C<use subs> declarations are not BLOCK-scoped.  They are thus effective
+for the entire file in which they appear.  You may not rescind such
+declarations with C<no vars> or C<no subs>.
+
+See L<perlmod/Pragmatic Modules> and L<strict/strict subs>.
+
+=cut
+require 5.000;
 
 sub import {
     my $callpack = caller;