loncom/lonnet/perl/lonnet.pm - diff

Return to lonnet.pm CVS log

Up to [LON-CAPA] / loncom / lonnet / perl

version 1.1213, 2013/02/07 13:59:14	version 1.1214, 2013/02/08 16:07:43
Line 12197 $readit=1;	Line 12197 $readit=1;
if ($test != 0) { $_64bit=1; } else { $_64bit=0; }	if ($test != 0) { $_64bit=1; } else { $_64bit=0; }
&logthis(" Detected 64bit platform ($_64bit)");	&logthis(" Detected 64bit platform ($_64bit)");
}	}
if (open(PIPE,"httpd -V 2>&1 \|")) {
while (<PIPE>) {	{
if (m{Apache/(\d+.\d+)}) {	eval {
$apache = $1;	($apache) =
last;	(Apache2::ServerUtil::get_server_version() =~ m{Apache/(\d+\.\d+)});
}	};
	if ($@) {
	$apache = 1.3;
}	}
close(PIPE);
}	}

}	}
}	}