help with syntax error

[Rick Triplett]

Can someone please help me find the syntax error in the following 
practice exercise. The perl compiler says: syntax error at line 7 near 
") {" but I cannot see it!

#!/usr/bin/perl -w

print "Enter the radius: \n";
chomp ($radius = <STDIN>);
$area = $radius*$radius*3.14
if ( $radius <= 0 )  {
        print "The area is zero\n";
} else {
        print "The area is $area\n";
}
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]