> perl -e 'print *b,"\n";'
*main::x
> perl -e 'print \*b,"\n";'
GLOB(0x80d1f44)