Lines Matching refs:debug
130 $debug = $flag_d;
144 print "validRequirement = $validRequirement\n" if $debug;
189 print "debug = $debug server = $server\n" if $debug > 8;
190 if (! connect(S, $that) || ($debug == 10 && $server =~ /relay\d.UU.NET$/i)) {
213 if ($debug || $vw);
223 if ($debug || $vw);
285 print "(pretending 250$1<$2>)" if ($debug && $watch);
295 print "($newhost, $newaddr, $newname) = &parse($addr, $server, $oldname)\n" if $debug;
307 if ($debug && $newhost ne $newmxhost);
309 … print "levels = $levels, level{$u *** $server} = ".$level{"$u *** $server"}."\n" if ($debug > 1);
380 print "avgValid = $avgValid\n" if $debug;
390 …ng some valid to avoid invalid ".&compact($u,$server)."\n" if ($avgValid > 0.0 && ($vw || $debug));
439 print "Giveup at $file:$line!!! redirect okay = $redirect_okay; $reason\n" if $debug;
482 if ($debug > 8) {
502 print "Already $method fell back from $us -> \n" if $debug;
506 print "Fallback an MX expansion $us -> \n" if $debug;
509 print "Oldhost($host, $us) = " if $debug;
512 print "$oldhost\n" if $debug;
514 print "$method Fallback = ".$fall_table{$ft}."\n" if $debug;
518 print "Falling back ($method) $us -> $newhost (from $oldhost)\n" if $debug;
522 print "resetting oldhost $oldhost to the original: " if $debug;
524 print "$oldhost\n" if $debug;
527 print "mxbacktrace $user *** $newhost -> $oldhost\n" if $debug;
534 print "Can still $method $us: @so\n" if $debug;
537 print "No more fallbacks for $us\n" if $debug;
557 print "validAddr($addr) = $res\n" if $debug;
576 print "validAddr($addr) = ???\n" if $debug;
619 push(@ret,&read_response($2,$debug));
625 push(@ret,&read_response($2,$debug));
683 print "<A:$1>\n" if $debug;
685 print "na = $newaddr\n" if $debug;
689 print "N:$1 <A:$2> N:$3\n" if $debug;
692 print "na = $newaddr\n" if $debug;
696 print "A:$1 (N:$2) A:$3\n" if $debug;
708 print "newaddr now = $newaddr\n" if $debug;
719 print "(\@:)" if $debug;
724 print "(\@)" if $debug;
736 print "(?)" if $debug;
781 print "domainify($host,$domain_host) = $host\n" if $debug;
814 print "long = $long\n" if $debug;
817 print "condensed fallback $host $domain_host -> $long\n" if $debug;
824 print "FALLBACK $host.$fh = 1\n" if $debug > 7;
840 print "domainify($host,$domain_host) = $host\n" if $debug;
851 print "domainify($host,$domain_host) = $newhost\n" if $debug;
854 if ($debug) {
880 if (($debug > 3) || (defined $giveup{$host})) {
888 print "expn($host,$addr,$name)\n" if $debug;
943 if ($debug > 1);
972 print "Temporary redirect taken $u *** $h -> " if $debug;
974 print "$h\n" if $debug;
980 print "temporary redirect taken $u *** $h -> " if $debug;
982 print "$h\n" if $debug;
1020 print if ($debug > 2);
1071 print "MX($server) = $nserver\n" if $debug;
1072 print "$server -> $nserver\n" if $vw && !$debug;
1092 if ($debug > 1);
1095 if ($debug || $verbose);
1098 if ($debug || $verbose);
1122 print "Un&domainifying($host) = " if $debug;
1124 print "$host\n" if $debug;
1150 print "au = $au ah = $ah\n" if $debug;
1153 print "Rewrite! to $addr\n" if $debug;