[perl #63592] repeated 0.substr(-10) leads to segfault

[NotFound via RT]

Created track ticket TT #804 as RFC with a patch that modifies throwing
of exceptions from C that might solve this problem. With it the pir
example runs forever.
Please put comments about it on trac, not here.