Hallo zusammen,

als PHP-Programmierer hab ich zum ersten Mal mit Perl zu tun und versuche "Algorithm-Diff-1.1902" zum Laufen zu bringen.

Hab laut Anweisung der Wissensbasis zur manuellen Installation ein Skript zusammenkopiert:


#!/usr/bin/perl

use lib qw(/www/htdocs/w00a0365/cgi-bin/diff_perl/lib/Algorithm);

perl Makefile.PL PREFIX=/www/htdocs/*****/cgi-bin/diff_perl/lib LIB=/www/htdocs/*****/cgi-bin/diff_perl/lib
make
make test
make install


Wie der launige Hinweis "...und ein paar system()-Befehle" umzusetzen ist, weiß ich nicht.

Ergebnis des Skripts: Fehler 500


Vorher hatte ich versucht das Perl-Skript zum Textvergleich direkt anzuwerfen.
Damit die Lib gefunden wird hatte ich den Suchpfad ergänzt.

#!/usr/bin/perl -w
use strict;
use File::Find;
use CGI::Carp qw(fatalsToBrowser);

BEGIN {
push(@INC, '/www/htdocs/*****/cgi-bin/diff_perl/lib/');
};
use Algorithm::Diff qw(diff);
...

Zum Debuggen funktioniert die, jedoch nicht warn.


Freue mich über jede Hilfe, um das Diff-Skript verwenden zu können.