On Sun, 30 Jun 2002, Michael  Turner wrote:

> > $ perl -Dt -le '$b=$b++'
> >
> > EXECUTING...
> >
> > (-e:0)  enter
> > (-e:0)  nextstate
> > (-e:1)  gvsv(main::b)
> > (-e:1)  postinc
> > (-e:1)  gvsv(main::b)
> > (-e:1)  sassign
> > (-e:1)  leave

> Now to go look up how you did that...  especially "-Dt"
> Oh, Dubugging not available with my package... hmm

Try this:

$ perl -mO=Terse -e '$b=$b++'
LISTOP (0x81021a0) leave
    OP (0x81021c8) enter
    COP (0x8102168) nextstate
    BINOP (0x8102140) sassign
        UNOP (0x8102120) postinc [1]
            UNOP (0x8102100) null [15]
                SVOP (0x815fb30) gvsv  GV (0x80ff500) *b
        UNOP (0x8170a00) null [15]
            SVOP (0x81732a8) gvsv  GV (0x80ff500) *b
-e syntax OK

I think that should work...

See also 'perldoc O', 'perldoc B', 'perldoc B::Terse'.

        Elias

-- 
Gefängnis für Hans Mustermann wegen
Fälschung und Verrat

         -- Die Einstürzenden Neubauten, Was ist ist


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to