Salve gente,
io di CGI e PERL nn ci capisco niente quindi solo voi potete darmi una manina....

Mi servirebbe una "traduzione" di questo codice :



if ($windows) {
if ($setcookie) {
if ($page =~ /$page_domain/ig && $use_page eq 1 || $goahead eq "OK") {
print $q->header(-cookie=>$cookie, -p3p=>"policyref=\"$p3purl\", CP=\"$p3pabbr\"");
print "<META HTTP-EQUIV=\"Refresh\" CONTENT=\"0; URL=$page\">";
} else {
print $q->header(-cookie=>$cookie, -p3p=>"policyref=\"$p3purl\", CP=\"$p3pabbr\"");
print "<META HTTP-EQUIV=\"Refresh\" CONTENT=\"0; URL=$home\">";
}
} else {
if ($page =~ /$page_domain/ig && $use_page eq 1 || $goahead eq "OK") {
print $q->header(-p3p=>"policyref=\"$p3purl\", CP=\"$p3pabbr\"");
print "<META HTTP-EQUIV=\"Refresh\" CONTENT=\"0; URL=$page\">";
} else {
print $q->header(-p3p=>"policyref=\"$p3purl\", CP=\"$p3pabbr\"");
print "<META HTTP-EQUIV=\"Refresh\" CONTENT=\"0; URL=$home\">";
}
}


Non mi importa sapere cosa fa, mi accontento di sapere ke dice (ad esempio) se la stringa XXX è uguale alla stringa YYY, allora fammi un redirect su...ecc...ecc...
Ki si offre volontario ?
Grazie!