my $count = @list;