$hoge = @{$name};
print $hoge;
print scalar @{$name};
print $#{$name}+1;