How to write Java Script in PerlCGI

[jaigs_27]

How do we write Java Script code in PerlCGI?

I have below Java Script code to fit in PerlCGI

<script type="text/javascript">
<!--
function validate() {
with (document.hform) {
var alertMessage = "The following REQUIRED fields\nhave been left empty:\n";
if (item.value == "") {
alertMessage += "\nitem"
} if (adesc.value == "") {
alertMessage += "\nadesc"
} if (cost.value == "") {
alertMessage += "\ncost"
} if (os.value == "") {
alertMessage += "\nos"
} if (quote.value == "") {
alertMessage += "\nquote"
} if (dim.value == "") {
alertMessage += "\ndim"
} if (pcord.value == "") {
alertMessage += "\npcord"
} if (pspec.value == "") {
alertMessage += "\nPlease enter your price range"
} if (alertMessage != "The following REQUIRED fields\nhave been left empty:\n") {
alert(alertMessage);
return (false);
} return (true);
}
}
// -->

[elija]

Do you want to convert that to Perl or do you want to use Perl to output the Javascript?

[jaigs_27]

Do you want to convert that to Perl or do you want to use Perl to output the Javascript?

I want to convert that in to the perlCI so that I can validate my form before submitting