#!perl -pl
$_=/.([]})>])/&&$+^$&^'3'|0?$`.$'||yes:"failed at: $+".($+?$':EOL)until/e/