X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FFile%2Fstat.pm;h=82cb3f6df3baaee5ef569da865c1221122d2b0a5;hb=acce7d4e04d89207299003c3e80c69d50bc82069;hp=581fbf32148197e4ff2d23dbce6250ef4bc76cf4;hpb=36477c247f3c188fb8cc7e276c87b739d3e6ab7c;p=p5sagit%2Fp5-mst-13.2.git diff --git a/lib/File/stat.pm b/lib/File/stat.pm index 581fbf3..82cb3f6 100644 --- a/lib/File/stat.pm +++ b/lib/File/stat.pm @@ -34,7 +34,7 @@ sub populate (@) { return $stob; } -sub lstat (*) { populate(CORE::lstat(shift)) } +sub lstat ($) { populate(CORE::lstat(shift)) } sub stat ($) { my $arg = shift; @@ -50,7 +50,7 @@ __END__ =head1 NAME -File::stat.pm - by-name interface to Perl's built-in stat() functions +File::stat - by-name interface to Perl's built-in stat() functions =head1 SYNOPSIS