-
Notifications
You must be signed in to change notification settings - Fork 1
/
autohandler
85 lines (81 loc) · 4.58 KB
/
autohandler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
% my $path_name = $r->uri;
% if ($path_name =~ /^\/download\// or $path_name =~ /^\/upload/) {
% $m->call_next;
% } else {
<HTML>
<HEAD>
<title>The Predicted Ribosomal Frameshift Signal Database, <% $document_title %></title>
<meta http-equiv="Content-Type" content="text/html">
<META NAME="ROBOTS" CONTENT="NOFOLLOW">
<META NAME="ROBOTS" CONTENT="NOINDEX">
<link rel="stylesheet" href="/style.css" type="text/css">
<!--[if IE]><script language="javascript" type="text/javascript" src="/js/excanvas.min.js"></script><![endif]-->
<script type="text/javascript" language="javascript" src="/js/jquery.js"></script>
<script type="text/javascript" language="javascript" src="/js/jquery.flot.js"></script>
<script type="text/javascript" language="javascript" src="/js/jquery.flot.stack.js"></script>
<script type="text/javascript" language="javascript" src="/js/jquery.flot.fillbetween.js"></script>
<script type="text/javascript" language="javascript" src="/js/jquery.flot.axislabels.js"></script>
<!--
<script type="text/javascript" language="javascript" src="/js/canvas2image.js"></script>
<script type="text/javascript" language="javascript" src="/js/canvastext.js"></script>
-->
<body bgcolor="white" text="black" link="#009933" vlink="#009900">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align = "center"><a href="./" target="_top">
<img src="/html/PRFdb_logo2.gif" width="153" height="51" vspace="2" border="0" alt="PRFdb logo" title="The Predicted Ribosomal Frameshift Signal Database">
<a href="./" target="_top">
<img src="/html/PRFdb_top_banner.jpg" width="197" height="48" vspace="2" border="0"></a>
</td>
</tr>
</table>
<table style="table-layout: fixed" width="100%" border="0" cellspacing="0" cellpadding="0">
<colgroup>
% my $column = 1; while ($column <= $columns) {
<col width="11%">
% $column++;
% }
<tr>
<td align="center" valign="top" bgcolor="<% ($r->uri eq "$path/index.html") ? "#366e6d" : "white" %>">
<b><a title="Main page" href="/"><% ($r->uri eq "$path/index.html") ? qq(<font color="white">) : "" %>Home</font></a></b></td>
<td align="center" valign="top" bgcolor="<% ($r->uri eq "$path/search.html") ? "#366e6d" : "white" %>">
<b><a title="Perform Search" href="/search.html"><% ($r->uri eq "$path/search.html") ? qq(<font color="white">) : "" %>Search</a></b></td>
<td align="center" valign="top" bgcolor="<% ($r->uri eq "$path/distribution.html") ? "#366e6d" : "white" %>">
<b><a title="View Distributions" href="/distribution.html"><% ($r->uri eq "$path/distribution.html") ? qq(<font color="white">) : "" %>Distribution</a></b></td>
<td align="center" valign="top" bgcolor="<% ($r->uri eq "$path/filter.html") ? "#366e6d" : "white" %>">
<b><a title="Perform filter" href="/filter.html"><% ($r->uri eq "$path/filter.html") ? qq(<font color="white">) : "" %>Filter</a></b></td>
<td align="center" valign="top" bgcolor="<% ($r->uri eq "$path/snp.html") ? "#366e6d" : "white" %>">
<b><a title="Search for SNPs" href="/snp.html"><% ($r->uri eq "$path/snp.html") ? qq(<font color="white">) : "" %>SNP</a></b></td>
<td align="center" valign="top" bgcolor="<% ($r->uri eq "$path/download.html") ? "#366e6d" : "white" %>">
<b><a title="Download sequences" href="/download.html"><% ($r->uri eq "$path/download.html") ? qq(<font color="white">) : "" %>Download</a></b></td>
<td align="center" valign="top" bgcolor="<% ($r->uri eq "$path/import.html") ? "#366e6d" : "white" %>">
<b><a title="Import Sequences" href="/import.html"><% ($r->uri eq "$path/import.html") ? qq(<font color="white">) : "" %>Import</a></b></td>
<td align="center" valign="top" bgcolor="<% ($r->uri eq "$path/fold.html") ? "#366e6d" : "white" %>">
<b><a title="Fold Sequences" href="/fold.html"><% ($r->uri eq "$path/fold.html") ? qq(<font color="white">) : "" %>Fold</a></b></td>
<td align="center" valign="top" bgcolor="<% ($r->uri eq "$path/help/help.html") ? "#366e6d" : "white" %>">
<b><a title="Get Help" href="/help/help.html"><% ($r->uri eq "$path/help/help.html") ? qq(<font color="white">) : "" %>Help</a></b></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#366e6d" height="5px" width="100%" colspan="<% $columns %>"></td>
</tr>
% if ($r->uri eq "$path/detail.html") {
</tr>
<tr>
<td bgcolor="#366e6d" width="100%" colspan="<% $columns %>"><center><b><font color="white">Detail View</font></b></center></td>
% }
</tr>
</table>
% $m->call_next;
</body>
</html>
% }
<%init>
my $session = $m->session;
my $path = '';
my $columns = 9;
my $col_width = 11;
</%init>
<%args>
$document_title => "index"
$category => undef
</%args>