diff --git a/contrib/check_dns_random.pl b/contrib/check_dns_random.pl
index 787d4644..4bed4120 100644
--- a/contrib/check_dns_random.pl
+++ b/contrib/check_dns_random.pl
@@ -55,9 +55,8 @@ $wc =~ s/domains//g;
 $x = rand $wc;
 ($z,$y) = split(/\./,$x);
 
-print `$check $data[$z] $host`;
-
-
+system($check, $data[$z], $host);
+exit ($? / 256);
 
 sub usage
 {