well the information is still available, var3 belongs to the tree below the first nextstate

$ perl -MO=Concise,-src tst_b_xref4.pl|perl -pe 'substr $_, -1, 0, " " +x(68-length$_) . " #:$1" if /(^#|nextstate|var\d+)/;' tst_b_xref4.pl syntax OK j <@> leave[1 ref] vKP/REFC ->(end) 1 <0> enter ->2 # 1: for ( # +:# 2 <;> nextstate(main 3 tst_b_xref4.pl:1) v:{ ->3 # +:nextstate 4 <1> preinc[t2] vK/1 ->5 - <1> ex-rv2sv sKRM/1 ->4 3 <#> gvsv[*var1] s ->4 # +:var1 5 <0> unstack v* ->6 i <2> leaveloop vK/2 ->j 6 <{> enterloop(next->c last->i redo->7) v ->f - <1> null vK/1 ->i h <|> and(other->7) vK/1 ->i g <1> postinc[t4] sK/1 ->h - <1> ex-rv2sv sKRM/1 ->g f <#> gvsv[*var2] s ->g # +:var2 - <@> lineseq vK ->- b <@> leave vKP ->c 7 <0> enter v ->8 # 6: $var4++; # +:# 8 <;> nextstate(main 1 tst_b_xref4.pl:6) v:{ ->9 # +:nextstate a <1> preinc[t8] vK/1 ->b - <1> ex-rv2sv sKRM/1 ->a 9 <#> gvsv[*var4] s ->a # +:var4 d <1> preinc[t6] vK/1 ->e - <1> ex-rv2sv sKRM/1 ->d c <#> gvsv[*var3] s ->d # +:var3 e <0> unstack v ->f

thanks Dave, I learned a lot! :)

Cheers Rolf
(addicted to the Perl Programming Language :)
Wikisyntax for the Monastery FootballPerl is like chess, only without the dice


In reply to Re^12: B::Xref buggy? by LanX
in thread B::Xref buggy? by LanX

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.