А именно:Undefined subroutine &main:

В чём может быть ошибка?
Код: Выделить всё
#!/usr/bin/perl
#programm 10
print "Content-Type: text/html\n\n";
&parse_form;
print "A + B = ",$FORM{'a'}+$FORM{'b'},"
";
print "A - B = ",$FORM{'a'}-$FORM{'b'},"
";
print "A * B = ",$FORM{'a'}*$FORM{'b'},"
";
print "A<sup>B</sup> = ",$FORM{'a'}**$FORM{'b'};