#!/usr/bin/perl -w
#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
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);
#check the browser since I don't this works well, if at all, with IE
# foreach $key (sort keys %ENV)
# {
# print "$key:$ENV{$key}
";
# }
#
# $browser=$ENV{HTTP_USER_AGENT};
# print "Browser is $browser
";
print <Harper Lab Protein Interaction Data
CompPASS
© 2007-2010 Mathew E. Sowa, J. Wade Harper &
President and Fellows of Harvard University
Website designed, written and maintained by M. Sowa.
The Human Autophagy Interaction Network (AIN)
END
;