[perl #125769] Failure bound to variable, as result of if statement, sinks and throws

[Larry Wall via RT]

Fixed in 091ee7507464595e7712f4ae911d95d467e5281b

Tests in 8b97aa4f6191affdd91da78607eca4ae6dc73b11