my $size = scalar @$var;