CGI-scripts for absolut begynder

Jeg forsøger at køre det her script, som er fundet på nettet, men får kun en Internal server error. Jeg er absolut nybegynder, og der er sikkert noget helt grundlæggende, jeg har overset ... har brug for et hint.

Scriptet skulle indsætte en ny post i Movable Type via mt-xmlrpc. Data-Dumper og XMLRPC Lite er installeret

#!C:\perl\bin\perl.exe -w

use strict;

use Data::Dumper;
use XMLRPC::Lite;

my $rpc = XMLRPC::Lite->new;
my $url = "http://localhost/mi/mt-xmlrpc.cgi";
$rpc->proxy($url);

## Might need to change username and password.
my $username = "Melody";
my $password = "Nelson";
my $message = "Test Message"

my $som =
  $rpc->call('blogger.newPost' => '', 1, $username, $password, $message, 0);

if ($som->fault) {
print "[", $som->faultcode, "] ", $som->faultstring, "\n";
} else {
print Dumper $som->result;
}