[comp.lang.perl] Are conditional breakpoints broken?

dcd@tc.fluke.COM (David Dyck) (11/14/90)

I set a breakpoint with a condition that will never happen
but the breakpoint still occurs.

Are conditional breakpoints broken, or how do I set a conditional
breakpoint?  
	(I started out doing a command like: "b 2 $a eq 'b'",
	but that didn't work either).

>cat -n t
     1	for $a (a, b, c) {
     2		print "$a\n";
     3	}

>perl -d t

Loading DB routines from perldb.pl 3.0.1.4 90/10/15

Enter h for help.

main'(t:1):     for $a (a, b, c) {
  DB<1> b 2 1==2
  DB<2> c
main'(t:2):             print "$a\n";
  DB<2> p 1==2
0
  DB<3> L
1:      for $a (a, b, c) {
2:              print "$a\n";
  break if (1==2)


Anyone have any ideas?

            David Dyck
    Domain: dcd@tc.fluke.COM
     Voice: +1 206 356 5807		Fax: +1 206 356 5992
      UUCP: {uunet,uw-beaver,decwrl,microsof,sun}!fluke!dcd
     Snail: John Fluke Mfg. Co. / P.O. Box 9090 / Everett WA  98206-9090 / USA

lwall@jpl-devvax.JPL.NASA.GOV (Larry Wall) (11/15/90)

In article <1990Nov14.050512.24837@tc.fluke.COM> dcd@tc.fluke.COM (David Dyck) writes:
: I set a breakpoint with a condition that will never happen
: but the breakpoint still occurs.
:...
: Anyone have any ideas?

That was fixed in patch 38.

Larry