This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
more pod patches
[perl5.git] / lib / User / pwent.pm
index 31cf742..91d23bd 100644 (file)
@@ -1,6 +1,7 @@
 package User::pwent;
 
 use 5.006;
+our $VERSION = '1.00';
 
 use strict;
 use warnings;
@@ -209,7 +210,7 @@ User::pwent - by-name interface to Perl's built-in getpw*() functions
  use User::pwent qw/:DEFAULT pw_has/;
  if (pw_has(qw[gecos expire quota])) { .... }
  if (pw_has("name uid gid passwd"))  { .... }
- print "Your struct pwd has: ", pw_has(), "\n";
+ print "Your struct pwd has: ", scalar pw_has(), "\n";
 
 =head1 DESCRIPTION
 
@@ -220,7 +221,7 @@ similarly named structure field name from the C's passwd structure
 from F<pwd.h>, stripped of their leading "pw_" parts, namely C<name>,
 C<passwd>, C<uid>, C<gid>, C<change>, C<age>, C<quota>, C<comment>,
 C<class>, C<gecos>, C<dir>, C<shell>, and C<expire>.  The C<passwd>,
-C<gecos>, and C<shell> fields should be considered tainted.
+C<gecos>, and C<shell> fields are tainted when running in taint mode.
 
 You may also import all the structure fields directly into your
 namespace as regular variables using the :FIELDS import tag.  (Note
@@ -250,7 +251,7 @@ You may ask whether one of these was implemented on the system Perl
 was built on by asking the importable C<pw_has> function about them.
 This function returns true if all parameters are supported fields
 on the build platform, false if one or more were not, and raises
-and exception if you asked about a field that Perl never knows how
+an exception if you asked about a field that Perl never knows how
 to provide.  Parameters may be in a space-separated string, or as
 separate arguments.  If you pass no parameters, the function returns
 the list of C<struct pwd> fields supported by your build platform's
@@ -286,7 +287,7 @@ Tom Christiansen
 
 =head1 HISTORY
 
-=over
+=over 4
 
 =item March 18th, 2000