> perl -e 'print "Yup\n" if *b;'
Yup
> perl -e 'print "Yup\n" if \*b;'
Yup