Hallo, ich habe ein Problem mit Erstellen eines Moduls bzw. Objekts. ---schnipp--- switch-form.pl: Can't locate auto/Addressbook/Forms/new.al in @INC (@INC contains: /home/frank/develop/perl/modules /usr/lib/perl5/5.005/i386-linux /usr/lib/perl5/5.005 /usr/local/lib/site_perl/i386-linux /usr/local/lib/site_perl /usr/lib/perl5 .) at ./switch-form.pl line 14 ---schnapp--- Ich habe mit "h2xs -A -X -n Addressbook::Forms" ein Modulskelett erzeugt. Das binde ich folgendermaßen ein: ---schnipp--- #!/usr/bin/perl -w BEGIN {unshift @INC, "/home/frank/develop/perl/modules";} use strict; use CGI::Form; use CGI::Carp qw(fatalsToBrowser); use Net::LDAP; use Addressbook::Forms; package main; my $f = new Addressbook::Forms; ---schnapp--- Meine Frage(n): Can't locate auto/Addressbook/Forms/new.al Wieso sucht Perl in "auto/..." ? Wieso sucht Perl new.al? Die Struktur Addressbook/Form liegt in /home/frank/develop/perl/modules. ---schnipp--- package Addressbook::Forms; use strict; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK); require Exporter; @ISA = qw(Exporter AutoLoader); # Items to export into callers namespace by default. Note: do not export # names by default without a very good reason. Use EXPORT_OK instead. # Do not simply export all your public functions/methods/constants. @EXPORT = qw( ); @EXPORT_OK = qw( ); $VERSION = '0.01'; # Preloaded methods go here. # Autoload methods go after =cut, and are processed by the autosplit program. 1; __END__ my %param = ( Titel=>undef, addscript=>undef, searchscript=>undef, removescript=>undef, BreiteFeldnamen=>undef, BreiteFelder=>undef ); sub new { my $that = shift; my $class = ref($that) || $that; my $self = {%param}; $self->BreiteFeldnamen=100; $self->BreiteFelder=100; bless $self, $class; return $self; } ---schnapp--- Unabhängig davon das sicher noch syntaktische Macken vorhanden sind, verstehe ich nicht warum er "falsche" Pfade und nicht vorhandene Dateien sucht. -- Frank Matthieß Frank.Matthiess@microdata-pos.de Support / Netzwerkadministration Am Wellbach 4 D 33605 Bielefeld +49 521 97 22 6-12 - Hinweise zur Benutzung dieser (und anderer Mailing-Listen) bitte beachten: --> http://lug-owl.de/mailinglist_hints.html <--
Teilnehmer (1)
-
Frank Matthieß