HELP alsjeblieft script met uitleg krijg ik niet a

Deze vraag gaat waarschijnlijk over CGI

hallo,

ik ben niet zo goed in cgi/perl en ik probeer nu al 2 dagen een script aan de praat te krijgen wat ik via het internet heb gevonden!

hier staat de hele uitleg:
[Login om links te zien]

het gaat eigenlijk alleen maar om dit stukje:

#!/usr/bin/perl

my ($ip_date, $file_time, $file, $apnic, $ripe, $arin, $lacnic, @registries, $url, $curl);
$ip_date = (strftime("%Y%m", localtime(time)))."01";
$file_time = (strftime("%Y%m%d-%H%M", localtime(time)));
$file = $file_time."_ip_data.txt";
$apnic = "ftp://ftp.apnic.net/pub/stats/apnic/apnic-latest";
$ripe = "ftp://ftp.apnic.net/pub/stats/ripe-ncc/_ripencc.latest";
$arin = "ftp://ftp.apnic.net/pub/stats/arin/arin.".$ip_date;
$lacnic = "ftp://lacnic.net/pub/stats/lacnic/lacnic.".$ip_date;
open (BODY,">>$file");
@registries=($apnic,$ripe,$arin,$lacnic);
foreach $url(@registries)
{
# Init the curl session
$curl= WWW::Curl::easy->new() or die "curl init failed!\n";
$curl->setopt(CURLOPT_URL, $url);
$curl->setopt(CURLOPT_FTP_USE_EPSV, '0');
$curl->setopt(CURLOPT_FILE, *BODY);
if ($curl->perform() != 0)
{
print "Failed ::".$curl->errbuf."\n";
}
}
close BODY;



$dbh = DBI->connect("DBI:mysql:host=localhost;database="data_base","user","wachtwoord",{PrintError=>0,RaiseError=>1});
$sth = $dbh->do("DELETE from ip_map");

print "\n\nData from ip_map table dropped\n\n";
$sth = $dbh->prepare("INSERT into ip_map values (?,?,?,?)");
$count = 0;
open (PROCESS, "<$file");
while ($line = <PROCESS>) {
chomp ($line);
if (($line =~ m/\|ipv4\|/) and ($line !~ m/\*/)) {
($registrar,$country_code,$item_type,$start_ip,$num_ip,$entry_date, $registry_type) = split(/\|/, $line);
@octets_start = split(/\./, $start_ip);
$long_start = 0;
foreach $octet_start (@octets_start) {
$long_start <<= 8;
$long_start |= $octet_start;
}
$long_end = $long_start + ($num_ip-1);
$count += $sth->execute($country_code,$registrar,$long_start,$long_end);

}
}
close PROCESS;

maar als ik dit als een .pl of .cgi upload met chmod 755 en het dan aanroep gebeurt er niks??
krijg ook geen errors
misschien dat ik iets mis een pad ofzo?


kan iemand mij helpen!!!!

thanx voor de info

is de database gemaakt?
volgens mij moet het ook niet in 1 pagina of wel?