use Getopt::Long;
my (
	$phoneip,
	$user,
	$Address,
	$passcode,
);
GetOptions(
	'phoneip=s'  => \$phoneip,
	'user=s'     => \$user,
	'Address=s'  => \$Address,
	'passcode=s' => \$passcode,
);