+#!/usr/bin/env perl
+
+use CGI qw/:standard/;
+print "HTTP/1.0 200 OK\n";
+print header("text/html");
+
+my $dn = $ENV{'PWD'};
+my $daqop = $ENV{'DAQOPSERVER'};
+
+print <<"HTML_DOCUMENT"
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
<head>
<li><a href="network/map.htm">Network Map</a>
</ul>
</div>
+
+<h3>Server Details</h3>
+<div class="index">
+ <table id="server-details">
+ <tr>
+ <td class="label">Location</td>
+ <td class="pre-value"><pre>$dn</pre></td></tr>
+ </tr>
+ <tr>
+ <td class="label">DAQ OP Server</td>
+ <td class="pre-value"><pre>$daqop</pre></td></tr>
+ </tr>
+ </table>
+</div>
</body>
-</html>
\ No newline at end of file
+</html>
+HTML_DOCUMENT
+;
\ No newline at end of file