[comp.sources.bugs] Small error in perl 3.0 production

admin@cs.exeter.ac.uk (Khalid Sattar) (10/25/89)

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