Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re: Debugger line numbering anomaly

by lzipin (Acolyte)
on Dec 26, 2019 at 00:07 UTC ( #11110619=note: print w/replies, xml ) Need Help??


in reply to Debugger line numbering anomaly

My grateful thanks to you all, particularly Rolf for your suggestions and prodding, and haukex for confirming the bug in Perl v5.26.*.

haukex, what did you search to find the bug references you cited?

BillKSmith, perltidy is new to me. But I tried it on my sample code; it did nothing with it (short of changing the whitespace). It didn't flag any issue with it.

Meanwhile, I've punted. The actual code was this:

s{\s(")?(\w+):(\w)((([^"\n]*)")|([^\s\n]*)([\s\n]))} { " <a>$2:$3" . ( ($1 && $5) ? "$6</a>" : "$7</a>$8" ) }eg;

That finds phrases like 'source:tag' and 'source:some tag' and wraps each in HTML anchor tags. I rewrote it like this:

my $p = qr{\s(")?(\w+):(\w)((([^"\n]*)")|([^\s\n]*)([\s\n]))}; s|$p| " <a>$2:$3" . ( ($1 && $5) ? "$6</a>" : "$7</a>$8" ) |eg;

So the full search-and-replace operation fits fine on one line.

Thanks again. Enjoy what's left of your holiday, wherever you are.

--Lee

Replies are listed 'Best First'.
Re^2: Debugger line numbering anomaly
by haukex (Bishop) on Dec 26, 2019 at 07:55 UTC
    what did you search to find the bug references you cited?

    In this case, I didn't directly search for the bug, I ran the bisect, and the second of the two commits referenced the bug.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://11110619]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (1)
As of 2022-05-22 15:00 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you prefer to work remotely?



    Results (80 votes). Check out past polls.

    Notices?