my ($var) = @list;