From: Karsten Sperling Date: Sat, 30 Dec 2000 22:27:09 +0000 (+0100) Subject: open() example in perlfunc.pod X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=38762f023a7a0aba09aa3c465e5ed1d34ca9d4d5;p=p5sagit%2Fp5-mst-13.2.git open() example in perlfunc.pod Message-ID: <"iraun1.ira.0090801:001230.213049"@ira.uka.de> p4raw-id: //depot/perl@8277 --- diff --git a/pod/perlfunc.pod b/pod/perlfunc.pod index f058baf..82086e3 100644 --- a/pod/perlfunc.pod +++ b/pod/perlfunc.pod @@ -2882,7 +2882,7 @@ another way to protect your filenames from interpretation. For example: sysopen(HANDLE, $path, O_RDWR|O_CREAT|O_EXCL) or die "sysopen $path: $!"; $oldfh = select(HANDLE); $| = 1; select($oldfh); - print HANDLE "stuff $$\n"); + print HANDLE "stuff $$\n"; seek(HANDLE, 0, 0); print "File contains: ", ;