doSomethingUseful(\%args);

sub doSomethingUseful
{	
	my $params = shift;
	my %args = %$params;
	
	my %users = $args{users};
	my %domains = $args{domains};
	my $path = $args{path};

	if (keys %users > 1)
	{
		print("I was hoping you'd say that.");
	}
}