Select Code to Download

sub SCALAR::SCALAR { ${+shift} }
sub ARRAY::ARRAY { @{+shift} }
sub HASH::HASH { %{+shift} }

my $scalar = $sref->SCALAR;
my @array = $aref->ARRAY;
my %hash = $href->HASH;