Hej! Hej!JavaScript i Perl!
Jag försöker lägga in JavaScript i html-koden i ett Perl-script, men det funkar inte eftersom JavaScriptet tros av perl-tolken vara perl-kod. Så min fråga är hur jag "kodar" JavaScriptens kod så det funkar. Koden ser nu ut så här, vilket inte fungerar:
sub manager_html {
my $output;
$output = qq~
<html>
<head>
<title>Admin</title>
<script lanuage="JavaScript">
<!--
function verifyForm() {
if (document.step2.name.value =="" ||
document.step2.age.value =="" ||
document.step2.email.value =="") {
alert ("You must fill in every field!");
return false;
}
}
// -->
</script>
</head>
och så vidare...Sv: JavaScript i Perl!
Du borde kunna skriva något typ sånt här:
sub manager_html {
print <<EOF;
<html>
<head>
<title>Admin</title>
<script lanuage="JavaScript">
<!--
function verifyForm() {
if (document.step2.name.value =="" ||
document.step2.age.value =="" ||
document.step2.email.value =="") {
alert ("You must fill in every field!");
return false;
}
}
// -->
</script>
</head>
EOF
}
... kanske?
Lycka till och lev väl,
Tom S.