sub is_balanced { eval "qw($_[0])" }