From: Boris Zentner <bzm@2bz.de>
Date: Sat, 12 Jun 2004 16:29:42 +0000 (+0200)
Subject: File::Basename docs
X-Git-Tag: accepted/trunk/20130322.191538~21897
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=1c33a35cacbed722d4acd472a2aa2fc114a4db3c;p=platform%2Fupstream%2Fperl.git

File::Basename docs
Message-Id: <200406121629.42595.bzm@2bz.de>

p4raw-id: //depot/perl@22938
---

diff --git a/lib/File/Basename.pm b/lib/File/Basename.pm
index 58a740e..887c7ba 100644
--- a/lib/File/Basename.pm
+++ b/lib/File/Basename.pm
@@ -12,7 +12,8 @@ dirname - extract just the directory from a path
 
     use File::Basename;
 
-    ($name,$path,$suffix) = fileparse($fullname,@suffixlist)
+    ($name,$path,$suffix) = fileparse($fullname,@suffixlist);
+    $name = fileparse($fullname,@suffixlist);
     fileparse_set_fstype($os_string);
     $basename = basename($fullname,@suffixlist);
     $dirname = dirname($fullname);
@@ -70,6 +71,8 @@ You are guaranteed that if you concatenate B<path>, B<name>, and
 B<suffix> together in that order, the result will denote the same
 file as the input file specification.
 
+In scalar context, fileparse() returns only the B<name> part of the filename.
+
 =back
 
 =head1 EXAMPLES
@@ -142,7 +145,7 @@ our(@ISA, @EXPORT, $VERSION, $Fileparse_fstype, $Fileparse_igncase);
 require Exporter;
 @ISA = qw(Exporter);
 @EXPORT = qw(fileparse fileparse_set_fstype basename dirname);
-$VERSION = "2.72";
+$VERSION = "2.73";
 
 
 #   fileparse_set_fstype() - specify OS-based rules used in future