Opened by Netspider at 2004-05-07 19:35
User since
2003-11-28
3645 Artikel
ModeratorIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-11-28
3645 Artikel
ModeratorIn
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
--- perl-5.8.x/lib/File/Copy.pm 2003-12-05 20:43:59.000000000 +0100
+++ new.perl-5.8.x/lib/File/Copy.pm 2004-05-10 11:56:38.000000000 +0200
@@ -274,8 +274,7 @@
copy("Copy.pm",\*STDOUT);
move("/dev1/fileA","/dev2/fileB");
- use POSIX;
- use File::Copy cp;
+ use File::Copy "cp";
$n = FileHandle->new("/a/file","r");
cp($n,"x");'
In der von dir ausgeschnitteten noch aelteren Version des Pods waren sogar noch versteckte single quotes enthalten (hinter der zweiten Zeile mit copy und in der letzten Zeile).
Schon nach einer halben Stunde wurde der Patch akzeptiert :-)
Ups, ich sehe gerade, dass ich den zweiten single quote nicht angemeckert habe. Das habe ich jetzt nachgeholt...