Use the right variable for the test ...

diff --git a/host/udpbridge/questions.pl b/host/udpbridge/questions.pl
index c146d50..1f2e972 100755 (executable)
--- a/host/udpbridge/questions.pl
+++ b/host/udpbridge/questions.pl
@@ -35,7 +35,7 @@ sub send_to {
        my $socket = new IO::Socket::INET(Proto => 'udp');
        my $servaddr = sockaddr_in($port, inet_aton($server));
        $socket->send($request, 0, $servaddr);
-       unless ($type =~ /G/) {
+       unless ($request =~ /G/) {
                print "Request sent.\n";
                return;
        }