diff options
Diffstat (limited to 'httemplate/elements/header.html')
-rw-r--r-- | httemplate/elements/header.html | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/httemplate/elements/header.html b/httemplate/elements/header.html new file mode 100644 index 000000000..10e4e40f1 --- /dev/null +++ b/httemplate/elements/header.html @@ -0,0 +1,21 @@ +<% + my($title, $menubar) = ( shift, shift ); + my $etc = @_ ? shift : ''; #$etc is for things like onLoad= etc. + my $head = @_ ? shift : ''; #$head is for things that go in the <HEAD> section +%> + <HTML> + <HEAD> + <TITLE> + <%= $title %> + </TITLE> + <META HTTP-Equiv="Cache-Control" Content="no-cache"> + <META HTTP-Equiv="Pragma" Content="no-cache"> + <META HTTP-Equiv="Expires" Content="0"> + <%= $head %> + </HEAD> + <BODY BGCOLOR="#e8e8e8"<%= $etc %>> + <FONT SIZE=6> + <%= $title %> + </FONT> + <BR><BR> + <%= $menubar ? "$menubar<BR><BR>" : '' %> |