>perl -MDevel::Peek -e"Dump int(2**32);"
SV = NV(0x184ac1c) at 0x226be4
  REFCNT = 1
  FLAGS = (NOK,pNOK)
  NV = 4294967296

##</code><code>##

sub to_string { "$_[0]" }
sub to_num    { 0+$_[0] }
sub to_bool   { !!$_[0] }
etc.