$ perl -E 'say < 2'
Unterminated <> operator at -e line 1.
$ perl -E 'say() < 2'

$ perl -E '(say) < 2'

$ perl -E 'say scalar(say) < 2'

1
$ perl -E 'sub foo(){1} say foo < 2'
1