$ perl -wle 'print (-2)**2'
    print (...) interpreted as function at -e line 1.
    Useless use of exponentiation (**) in void context at -e line 1.
    -2