perl -E"say qq(TRUE) if qq(FALSE)"