sub inplace
{
	my @in = @address;
	$_ = inet_aton($_) for @in;
	@in = sort @in;
	$_ = inet_ntoa($_) for @in;
	my @sorted = @in;
}