🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.sources.bugs
Article #207

Small error in perl 3.0 production (perldb)

#207
From: Khalid Sattar
Date: Wed, 25 Oct 1989 11:59
15 lines
1100 bytes
I have found a small error when using perl with -d option.  On startup
perl would complain about syntax error in perldb.pl.  Sure enough I
found a line

$header =~ s/\$Header: perldb.pl,v 3.0 89/10/18 15:19:46 lwall Locked $/$1$2/;

The fix is to change it to something like

$header =~ s|\$Header: perldb.pl,v 3.0 89/10/18 15:19:46 lwall Locked $|$1$2|;

--
Khalid Sattar                   JANET  : admin@uk.ac.exeter.cs 
Computer Science Dept.          UUCP   : admin@expya.uucp
University of Exeter            BITNET : admin%uk.ac.exeter.cs@ukacrl
Exeter, UK.                     Tel    : +44 392 264062
Technical Details
Message-ID: <ADMIN.89Oct25125928@expya.cs.exeter.ac.uk>
Path: arc1-ca.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!rutgers!tut.cis.ohio-state.edu!bloom-beacon!eru!luth!sunic!mcsun!ukc!warwick!expya!admin

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!rutgers!tut.cis.ohio-state.edu!bloom-beacon!eru!luth!sunic!mcsun!ukc!warwick!expya!admin
From: admin@cs.exeter.ac.uk (Khalid Sattar)
Newsgroups: comp.sources.bugs
Subject: Small error in perl 3.0 production (perldb)
Message-ID: <ADMIN.89Oct25125928@expya.cs.exeter.ac.uk>
Date: 25 Oct 89 11:59:28 GMT
Sender: admin@cs.exeter.ac.uk
Distribution: comp
Organization: Computer Science Dept. - University of Exeter. UK
Lines: 15