$ perl -MO=Deparse -e 'sub META : lvalue { $a } META ? a : b '
Search pattern not terminated or ternary operator parsed as search pattern at -e
 line 1.
sub META : lvalue {
    $a;
}