my $x = $q->Vars; my $y = $q->Vars; my $z = $x;