#!/usr/bin/perl -w
#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

# 2017-08-22 Nope, this isn't valid and will now cause an error... -DSM
#print "HTTP/1.0 200 OK";

print "Content-type:  text/html\n\n";

 use CGI ':standard';
 use DBI;
 my $db_user_name = $ENV{COMPPASS_MYSQL_USER};
 my $db_user_passwd = $ENV{COMPPASS_MYSQL_PASSWORD};
 my $dsn = "DBI:mysql:pubs:localhost";
 my $dbh = DBI->connect($dsn, $db_user_name, $db_user_passwd);

print <<END

<title>CompPASS Download Page</title>
<head>
<link rel="shortcut icon" href="/icons/CompPASSlogo_tiny.gif" type="gif"/>
<link rel="stylesheet" type="text/css" href="../CompPASSsafari.css"/>
<link rel="stylesheet" type="text/css" href="../tables.css"/>
<style type="text/css">
  .sidebartext {
	font: 150% century gothic;
	text-align: left;
	padding: 0;
	margin: auto;
}
  .largetext {
	font: 200% century gothic;
	text-align: left;
	padding: 0;
	margin: auto;
}
  .normaltext {
	font: 100% century gothic;
	text-align: left;
	padding: 0;
	margin: auto;
}
  .smalltext {
	font: 85%/1.0 century gothic;
	text-align: left;
	padding: 10;
	margin: auto;
}
  .verysmalltext {
	font: 70%/1.0 century gothic;
	text-align: left;
	padding: 0;
	margin: auto;
}
  .sequencetext {
	font: 150%/1.0 courier new;
	text-align: left;
	padding: 0;
	margin: auto;
	word-wrap: break-word;
}
  a.mainlinks {
	text-decoration : none;
	color: black;
}
  a.tablelinks {
	text-decoration : none;
	font: bold 16px "Trebuchet MS", Verdana, Arial, Helvetica, sans-serif;
	color: #4f6b72;
	text-transform: uppercase;
	text-align: center;
	white-space: nowrap;
}
</style>


</head>
<a href="/ipmsmsdbs/comppass.html"><img class="floatright" src="/icons/FalconIcon_007.gif" border=0 title="Back to Falcon Home Page" width=250></a>
<TABLE class="floatleft">
<TR>
	<TD class="clear"><img ALIGN=TOP src="/icons/CompPASS_main_logofinal.gif" border=0 width=100></TD>
	<TD class="clear"><a href="http://pathology.hms.harvard.edu/labs/harper/Welcome.html"><img ALIGN=TOP src="/icons/harvard_harper_cell_bio_logo.gif" title="Check out the Harper Lab" border=0  width=150></A><P>
<font class="verysmalltext"><B>CompPASS</B>
&copy; 2007-2011 Mathew E. Sowa, J. Wade Harper & <BR>President and Fellows of Harvard University<BR>Website designed, written and maintained by M. Sowa.</font>
</TD>
</TR>
</TABLE>
<TABLE><TR>
<TD class="clear">
<a href="../DubsAndIntsMain.php"><img src="/icons/DUBclassesForWebSmall.gif" border=0 title="Back to Dubs & Interactors Home Page" ></a>
</TD>
<TD class="clear">
<a href="../AIN_Main.php"><img src="/icons/OurAutophagyPathwaySmall.gif" border=0 title="Back to AIN Home Page" ></a>
</TD>
<TD class="clear">
<a href="../ERAD_Main.php"><img src="../ERAD-network-website-image-3s.gif" border=0 title="Back to ERAD Home Page" ></a>
</TD>
</TR></TABLE>
<TABLE width=100%>
<TR>
	<TD font class="smalltext"><a class="mainlinks" href="/ipmsmsdbs/cgi-bin/search_ip_data.cgi">Search</a></TD>
	<TD font class="smalltext"><a class="mainlinks" href="/ipmsmsdbs/cgi-bin/downloads.cgi">Downloads</TD>
	<TD font class="smalltext"><a class="mainlinks" href="/ipmsmsdbs/cgi-bin/tutorial.cgi">Tutorials</TD>
	<TD font class="smalltext"><a class="mainlinks" href="/ipmsmsdbs/cgi-bin/feedback.cgi">Feedback & Requests</TD>
</TR>
</TABLE>
<img src="/icons/line.gif"><P><P>
<font class="largetext">Welcome to the downloader page.<BR></font><font class="normaltext">On this page, you can bulk download either the Dub or AIN sets by clicking on the set name. <BR>For individual downloads, please visit that bait's CompPASS analysis page and download from there.<P>
<P>
<TABLE><TH width=400><a class=\"tablelinks\" href=\"/ipmsmsdbs/cgi-bin/downloader.cgi?file=DUBS.zip\">The Dub Set (102 baits)</font></font></a></TH></TABLE><P><P>
<TABLE><TH width=400><a class=\"tablelinks\" href=\"/ipmsmsdbs/cgi-bin/downloader.cgi?file=AIN.zip\">The AIN Set (65 baits)</font></font></a></TH></TABLE><P><P>
<TABLE><TH width=400><a class=\"tablelinks\" href=\"/ipmsmsdbs/cgi-bin/downloader.cgi?file=ERAD.zip\">The INfERAD Set (25 baits)</font></font></a></TH></TABLE><P><P>
END
;
