problemas com Perl

[ozzymaia]

O que está errado?

print “Qual eh sua idade ?”;
$a = <STDIN>;
chomp($a);
if ($a < 16) {
print “Entao voce não pode votar\n”;
} elseif ($a<60) {
print ”Legal! você pode votar\n”;
} else {
print "Então você não precisa votar!!!\n"
$votantes++
}

Alguém sabe?
Falow!!!

Vamos arrumar esse codigo um pouquinho:

*no antigo voce tinha errado o elsif (voce pode elseif, no perl eh elsif)

my $idade;
my $votantes;
print "Qual a sua idade ?";
$idade=<STDIN>;
if($idade < 16)
{
print "Voce nao pode votar ...\n";
}
elsif($idade < 60)
{
print "Voce tem que votar ...\n";
}
else
{
print "Voce nao precisa votar ...\n";
}
$votantes++;


[]`s

Daniel B. Cid

Valeu!!!!