Remove stray '.

p4raw-id: //depot/perl@22804

diff --git a/lib/File/Copy.pm b/lib/File/Copy.pm
index 69ac361..9311fd4 100644 (file)
--- a/lib/File/Copy.pm
+++ b/lib/File/Copy.pm
@@ -277,7 +277,7 @@ File::Copy - Copy files or filehandles
        use File::Copy "cp";
 
        $n = FileHandle->new("/a/file","r");
-       cp($n,"x");'
+       cp($n,"x");
 
 =head1 DESCRIPTION