#! /usr/bin/perl


# PREAMBLE
use CGI;
use strict;

my ($cgi) = new CGI;
print $cgi->header ();
print $cgi->start_html (-title=>'LATIN DECLENSION',
					   -author=>'keloon@catholic.org.hk',
					   -base=>'true',
					   -meta=>{'keywords'=>'Latin Grammar',
					           'content'=>"text/html; charset=utf-8",'keywords'=>'Latin Grammar','copyright'=>'copyright 2000, Louis Ha'},
					   -BGCOLOR=>'#CCCCFF');

print "<BR>";
print "<center>";
print "<H4><font size=5 face=Times News Roman color=red>FOURTH CONJUGATION VERB</font></H4>";
print "</center>";

# MAIN-BODY
my ($prstem) = $cgi->param ("prstem");
my ($pfstem) = $cgi->param ("pfstem");
my ($sustem) = $cgi->param ("sustem");
my ($instem) = $cgi->param ("instem");
my ($english) = $cgi->param ("english");
declense ($prstem,$pfstem,$sustem,$instem,$english) if ($prstem,$pfstem,$sustem,$instem,$english);
# ending
print $cgi->hr();
print '<strong><font size = "3"><A HREF="http://www.catholic.org.hk/latin/conjugation/verb_4.html" TARGET="_parent">Return to Main page</strong></font></A><br><br>';
print '<strong><font size = "2">The present website is compiled for an introductory Latin course at the Chinese University of Hong Kong by <A HREF="mailto:keloon@catholic.org.hk" TARGET="_parent">Dr. Louis Ha</A>.<br>';
print 'Copyright by Louis Ha, 2000.</font></strong><br>';
print $cgi->center ('*     *     *');
print '<br><br>';
## MAIN-BODY

# DECLENSE
sub declense{
	print "<center><big>";
#	printf "<b>Latin   : %s<BR><BR></b>\n",
#		$cgi->escapeHTML ($key_word).", -is, -e";
	print $cgi->blockquote(qq{<font face='Times News Roman'><b>Latin : $prstem-io, $instem, $pfstem-i, $sustem-um</b></font>}); 
	printf "<b>English : %s<BR><BR>\n",
		$cgi->escapeHTML ($english);
	print $cgi->hr();
print $cgi->blockquote(qq{<font face='Times News Roman'><table border=1 cellpadding=5 cellspacing=5>
<tr><td><big><big></td>
<td bgcolor=0000ff><big><big><font color=ffff00><b>ACTIVE</b></font><L></L></td>
<td bgcolor=0000ff><big><big></td>
</tr>
<tr><td><big><big></td>
<td bgcolor=05AFFA><big><big>INDICATIVE<L></L></td>
<td bgcolor=A1D3F8><big><big>SUBJUNCTIVE</td>
</tr>
<tr><td><big><big></td>
<td><big><big><b>PRESENT</b><L></L></td>
<td><big><big><L></L></td>
</tr>
<td><big><big>1.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>io</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>iam</B></L></td>
</tr>
<tr>
<td><big><big>2.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>is</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>ias</B></L></td>
</tr>
<tr>
<td><big><big>3.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>it</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>iat</B></L></td>
</tr>
<tr>
<td><big><big>1.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>&#299;mus</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>i&#257;mus</B></L></td>
</tr>
<tr>
<td><big><big>2.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>&#299;tis</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>i&#257;tis</B></L></td>
</tr>
<tr>
<td><big><big>3.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>iunt</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>iant</B></L></td>
</tr>
<tr>
<td><big><big></td>
<td><big><big><b>IMPERFECT</b></td>
<td><big><big></td>
</tr>
<tr>
<td><big><big>1.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>i&#275;bam</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>&#299;rem</B></L></td>
</tr>
<tr>
<td><big><big>2.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>i&#275;bas</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>&#299;res</B></L></td>
</tr>
<tr>
<td><big><big>3.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>i&#275;bat</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>&#299;ret</B></L></td>
</tr>
<tr>
<td><big><big>1.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>ieb&#257;mus</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>ir&#275;mus</B></L></td>
</tr>
<tr>
<td><big><big>2.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>ieb&#257;tis</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>ir&#275;tis</B></L></td>
</tr>
<tr>
<td><big><big>3.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>i&#275;bant</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>&#299;rent</B></L></td>
</tr>
<tr>
<td><big><big></td>
<td><big><big><b>FUTURE</b></td>
<td><big><big></td>
</tr>
<tr>
<td><big><big>1.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>iam</B></L></td>
<td><big><big></td>
</tr>
<tr>
<td><big><big>2.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>ies</B></L></td>
<td><big><big></td>
</tr>
<tr>
<td><big><big>3.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>iet</B></L></td>
<td><big><big></td>
</tr>
<tr>
<td><big><big>1.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>i&#275;mus</B></L></td>
<td><big><big></td>
</tr>
<tr>
<td><big><big>2.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>i&#275;tis</B></L></td>
<td><big><big></td>
</tr>
<tr>
<td><big><big>3.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>ient</B></L></td>
<td><big><big></td>
</tr>
<tr><td><big><big></td>
<td><big><big><b>PERFECT</b><L></L></td>
<td><big><big><L></L></td>
</tr>
<td><big><big>1.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>i</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>erim</B></L></td>
</tr>
<tr><td><big><big>2.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>&#299;sti</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>eris</B></L></td>
</tr>
<tr>
<td><big><big>3.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>it</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>erit</B></L></td>
</tr>
<tr>
<td><big><big>1.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>imus</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>er&#299;mus</B></L></td>
</tr>
<tr>
<td><big><big>2.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>&#299;stis</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>er&#299;tis</B></L></td>
</tr>
<tr>
<td><big><big>3.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>&#275;runt</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>erint</B></L></td>
</tr>
<tr>
<td><big><big></td>
<td><big><big><b>PLUPERFECT</b></td>
<td><big><big></td>
</tr>
<tr>
<td><big><big>1.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>eram</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>&#299;ssem</B></L></td>
</tr>
<tr>
<td><big><big>2.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>eras</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>&#299;sses</B></L></td>
</tr>
<tr>
<td><big><big>3.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>erat</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>&#299;sset</B></L></td>
</tr>
<tr>
<td><big><big>1.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>er&#257;mus</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>iss&#275;mus</B></L></td>
</tr>
<tr>
<td><big><big>2.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>er&#257;tis</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>iss&#275;tis</B></L></td>
</tr>
<tr>
<td><big><big>3.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>erant</B></L></td>
<td bgcolor=A1D3F8><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>&#299;ssent</B></L></td>
</tr>
<tr>
<td><big><big></td>
<td><big><big><b>FUTURE PERFECT</b></td>
<td><big><big></td>
</tr>
<tr>
<td><big><big>1.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>ero</B></L></td>
<td><big><big></td>
</tr>
<tr>
<td><big><big>2.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>eris</B></L></td>
<td><big><big></td>
</tr>
<tr>
<td><big><big>3.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>erit</B></L></td>
<td><big><big></td>
</tr>
<tr>
<td><big><big>1.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>&#275;rimus</B></L></td>
<td><big><big></td>
</tr>
<tr>
<td><big><big>2.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>&#275;ritis</B></L></td>
<td><big><big></td>
</tr>
<tr>
<td><big><big>3.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>erint</B></L></td>
<td><big><big></td>
</tr>
<tr><td></td><td></td><td></td></tr>
<tr>
<td><big><big></td>
<td><big><big><b>IMPERATIVE</b></td>
<td><big><big></td></tr>
<tr>
<td><big><big>2.sg</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>i</B></L></td>
<td><big><big></td>
<td><big><big><L><FONT COLOR="#FF3333"></font><B></B></L></td>
</tr>
<tr>
<td><big><big>2.pl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>&#299;te</B></L></td>
<td><big><big></td>
<td><big><big><L><FONT COLOR="#FF3333"></font><B></B></L></td>
</tr>
</table><br><br>

<TABLE border=1 cellpadding=5 cellspacing=5>
<tr><td><big><big></td>
<td bgcolor=05AFFA><big><big><B>INFINITIVE</B></L></td>
<td bgcolor=05AFFA><big><big><B>PARTICIPLE</B></L></td>
<td bgcolor=ffff00><big><big><B>PARTICIPLE</B></L></td>
</tr>
<tr><td><big><big></td>
<td><big><big>PRESENT</td>
<td><big><big></td>
<td><big><big></td>
</tr>
<tr><td><big><big></td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>&#299;re</B></L></td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>iens, (-tis)</B></L></td>
<td><big><big><L><FONT></font><B></B></L></td>
</tr>
<tr><td><big><big></td>
<td><big><big>PERFECT</td>
<td><big><big></td>
<td><big><big></td>
</tr>
<td><big><big></td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$pfstem</font><B>&#299;sse</B></L></td>
<td><big><big><L><FONT></font><B></B></L></td>
<td bgcolor=ffff00><big><big><L><FONT COLOR="#FF3333">$sustem</font><B>us -a -um</B></L></td>
</tr>
<tr><td><big><big></td>
<td><big><big>FUTURE</td>
<td><big><big></td>
<td><big><big></td>
<td><big><big></td>
</tr>
<td><big><big></td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$sustem</font><B>&#363;rus esse</B></L></td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$sustem</font><B>&#363;rus</B></L></td>
<td bgcolor=ffff00><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>i&#275;ndus</B></L></td>
</tr>
</table> <p>

<TABLE border=1 cellpadding=5 cellspacing=5>
<tr><td><big><big></td>
<td bgcolor=06AFFA><big><big><B>GERUND</B></L></td>
<td bgcolor=06AFFA><big><big><B>SUPINE</B></L></td>
</tr>
<tr><td><big><big>Gen</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>i&#275;ndi</B></L></td>
<td><big><big></td>
</tr>
<tr><td><big><big>Dat</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>i&#275;ndo</B></L></td>
<td><big><big></td>
</tr>
<tr><td><big><big>Acc</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>i&#275;ndum</B></L></td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$sustem</font><B>um</B></L></td>
</tr>
<tr><td><big><big>Abl</td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$prstem</font><B>i&#275;ndo</B></L></td>
<td bgcolor=05AFFA><big><big><L><FONT COLOR="#FF3333">$sustem</font><B>u</B></L></td>
</tr>
</table>
</center></center>
});

}


## WEBPAGE OUTPUT
