From d066ad0f7923df77c196bc64360843fa02f2aef1 Mon Sep 17 00:00:00 2001 From: Father Chrysostomos Date: Fri, 11 Mar 2011 13:22:43 -0800 Subject: [PATCH] [perl #85884] Erroneous description of File::Basename::fileparse Literal backslashes need single quotes. --- lib/File/Basename.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lib/File/Basename.pm b/lib/File/Basename.pm index 696b601..f928e32 100644 --- a/lib/File/Basename.pm +++ b/lib/File/Basename.pm @@ -54,7 +54,7 @@ our(@ISA, @EXPORT, $VERSION, $Fileparse_fstype, $Fileparse_igncase); require Exporter; @ISA = qw(Exporter); @EXPORT = qw(fileparse fileparse_set_fstype basename dirname); -$VERSION = "2.80"; +$VERSION = "2.81"; fileparse_set_fstype($^O); @@ -78,8 +78,8 @@ The remainder of the $path is the $filename. # On Unix returns ("baz", "/foo/bar/", "") fileparse("/foo/bar/baz"); - # On Windows returns ("baz", "C:\foo\bar\", "") - fileparse("C:\foo\bar\baz"); + # On Windows returns ("baz", 'C:\foo\bar\', "") + fileparse('C:\foo\bar\baz'); # On Unix returns ("", "/foo/bar/baz/", "") fileparse("/foo/bar/baz/"); -- 2.7.4