Export aus Modulen: %EXPORT_TAGS = () ... klappt nicht. (Allgemeines zu Perl)

[thread]7435[/thread]

Export aus Modulen: %EXPORT_TAGS = () ... klappt nicht.

Leser: 1

Matze

2005-11-04 21:57

User since
2005-08-29
222 Artikel
BenutzerIn

Ich möchte gerne mit Export-Tags meine Funktionen Exportieren.

Geschriebn habe ich dazu im Modul:

Code: (dl )

package WritE;

require Exporter;
@ISA = qw(Exporter);
%EXPORT_TAGS = (':win' => [qw/color title write fill box/],
         ':tk' => [qw/mw geo/],
         ':all' => [qw/:win :tk/]
        );

Im Programm (Aufruf):

Code: (dl )

use WritE qw(:win);

Nun bekomme ich allerdings immer diese Fehlermeldung:

"win" is not defined in %WritE::EXPORT_TAGS at C:\Daten\Programmieren\Perl\Sonstige\Module\WritE\demos\win\all.pl line 12
main::BEGIN() called at ../..//WritE.pm line 12
eval {...} called at ../..//WritE.pm line 12
Can't continue after import errors at C:\Daten\Programmieren\Perl\Sonstige\Module\WritE\demos\win\all.pl line 12
BEGIN failed--compilation aborted at C:\Daten\Programmieren\Perl\Sonstige\Module\WritE\demos\win\all.pl line 12.

Kann mir da jemand weiterhelfen ?

MfG. Matze

Mit freundlichen Grüßen: Matze

betterworld

2005-11-04 22:01

User since
2003-08-21
2614 Artikel
ModeratorIn

user image

Lass in %EXPORT_TAGS mal die Doppelpunkte weg.\n\n

Lieblingsmodule: CPAN:

IPC::System::Simple, CPAN:

Path::Class

Matze

2005-11-05 09:46

User since
2005-08-29
222 Artikel
BenutzerIn

OK, das habe ich gemacht, nun bekomme ich diese Fehlermeldung, die Funktionen seien nicht exportiert:

"fill" is not exported by the WritE module
"color" is not exported by the WritE module
"title" is not exported by the WritE module
"box" is not exported by the WritE module
"write" is not exported by the WritE module
Can't continue after import errors at C:\Daten\Programmieren\Perl\Sonstige\Module\WritE\demos\win\all.pl line 12
BEGIN failed--compilation aborted at C:\Daten\Programmieren\Perl\Sonstige\Module\WritE\demos\win\all.pl line 12.

Ich habe in CGI.pm nachgesehen, da ich schon lange keine %EXPORT_TAGS mehr verwendet habe, und dort steht es genau so, wie ich es zu Anfang gepostet habe.

MfG. Matze

Mit freundlichen Grüßen: Matze

2005-11-05 13:24

User since
2003-08-04
12208 Artikel
Admin1

our @EXPORT_OK = qw(fill color title box write);

btw:
require Exporter; @ISA = qw(Exporter);
schreibt sich viel kürzer als
use base 'Exporter';

ausserdem sei dir die benutzung von strict ans herz gelegt ( Wiki:

use strict)

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem

Matze

2005-11-06 20:58

User since
2005-08-29
222 Artikel
BenutzerIn

Danke!
Jetzt funktioniert es, ich habe nochmal in CGI.pm nachgesehen und herausgefunden, das dort mit einem eigenen import, und export-Mechanismus gearbeitet wird.

Wäre es ein größeres Programm gewesen, dann hätte ich use strict; benutzt, aber das Programm sollte nur ein Beispiel für WritE.pm sein.

Danke nochmal.

MfG. Matze

Mit freundlichen Grüßen: Matze

View all threads created 2005-11-04 21:57.