# New Ticket Created by # Please include the string: [perl #68728] # in the subject line of all future correspondence about this issue. # <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=68728 >
In Rakudo r40625:
% perl6 -e 'try { say abc; CATCH { say "A"; if "foo" ~~ /foo/ { say "B"; say
$/ } } }'
A
B
A
B
A
B
A
B
A
(infinite loop)
