$ perl -lwe 'open F, "/dev/null" or die; print *F{IO}; print *STDOUT{IO}'
IO::Handle=IO(0x926e508)
IO::Handle=IO(0x9256610)