sub setVarValue{
	($inputVal) = @_;
	
	$v = $inputVal;
	
	return $v
}
1;