$ perl -wle'print ((1))' print (...) interpreted as function at -e line 1. 1