This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Re: [perl #59134] Typo in File::stat man pag
authorMoritz Lenz <moritz@casella.verplant.org>
Sun, 21 Sep 2008 17:50:04 +0000 (19:50 +0200)
committerH.Merijn Brand <h.m.brand@xs4all.nl>
Sun, 21 Sep 2008 17:10:23 +0000 (17:10 +0000)
Message-ID: <20080921154935.4916.qmail@lists.develooper.com>

p4raw-id: //depot/perl@34386

lib/File/stat.pm

index 132cbee..22862d7 100644 (file)
@@ -76,7 +76,7 @@ File::stat - by-name interface to Perl's built-in stat() functions
 
  use File::stat qw(:FIELDS);
  stat($file) or die "No $file: $!";
- if ( ($st_mode & 0111) && $st_nlink > 1) ) {
+ if ( ($st_mode & 0111) && ($st_nlink > 1) ) {
      print "$file is executable with lotsa links\n";
  }