Perl Modulpfad

[steffenk]

habe folgendes Problem:
Bei einem Perlskript habe ich ein Modul importiert, was sich im Skriptpfad befindet.
Es funktioniert auch bei Aufruf im Browser / Shell
Rufe ich das Skript als Cronjob auf, ist der Pfad anscheinend unbekannt, das Modul wird nicht importiert.
Hat jemand einen Lösungsvorschlag ?

[steffenk]

OK, ich hab es lösen können mit

push (@INC, "absolute_path");

[martinR]

Hi,

Zitat von St@eff.en

push (@INC, "absolute_path");

eleganter ist

use lib "/absolute_path/";

cu

Martin

[steffenk]

das darf nicht so sein, da man nicht weiss, ob das Modul vorhanden ist
Hier der Auszug:

push (@INC, "$cgibin_path");
eval { $eval_in_died = 1; require MIME::Lite; };
if(!$@){
$mod_mime = 1;
import MIME::Lite;
}

es kann sein, das MIME::Lite im Lib-pfad ist, funktioniert aber auch, wenn man es einfach in den Scriptpfad kopiert, da das Modul nicht kompiliert ist.

[martinR]

Zitat von St@eff.en

das darf nicht so sein, da man nicht weiss, ob das Modul vorhanden ist

Das musst Du mir erklären

Natürlich musst Du sicherstellen, dass das Modul vorhanden ist. Auch wenn es selbst installierte/kopierte und nicht compilierte Module sind.

Ich installiere meine, auch selbst erstellte Module, immer im Verzeichnis /cgi-bin/MeineModule/

Und dann binde ich diese mit
use lib "/usr/local/httpd/cgi-bin/MeineModule/";
ein. Und es funzt einwandfrei

cu

[steffenk]

Zitat von martinR

Das musst Du mir erklären

Gern.

Das Perlscript ist aus dem OpenSource-Projekt aus meiner Sig.

Es benutzt eigentlich nur Standard-Module, die bei allen Usern installiert sind.
Da es Mail und FTP-Transport ermöglicht, prüfe ich, ob die Module installiert sind. Wenn ja, binde ich sie ein und aktiviere die jeweilige Funktion.

Der Mailtransport wird über MIME::Lite realisiert.
Dieses Modul ist bei den meisten Usern nicht installiert. Da es sich aber um ein unkompiliertes Modul handelt, kann man es ins Scriptpfad kopieren.

Hat ein User das Script so konfiguriert, das es Mail verschicken soll, muss ich also erst abfragen, ob das Modul auch da ist. Dies geschieht mit der Anweisung
eval { $eval_in_died = 1; require MIME::Lite; };
Hat das geklappt, kann ich es importieren und die Mailfunktion aktivieren,
in dem Fall steht nix in $@. Hat das nicht geklappt, steht der Fehler in $@ und ich weiss, das MIME::Lite nicht installiert ist.

vg steffen