C:\>perl -e "print 'yes' if( {} );"
yes
C:\>perl -e "print 'yes' if(-3);"
yes