Thread Perl 5.6.1 (Pakete, Bibliotheken und Module) (6 answers)
Opened by suliko at 2008-10-09 16:55

suliko
 2008-10-09 16:55
#115324 #115324
User since
2006-04-26
23 Artikel
BenutzerIn
[default_avatar]
Hallo Leute,

ich stehe auf dem Schlauch... :(

Zuerst aber die Dateistruktur:


/home/user/cgi/Funcs/errors.pm
/home/user/cgi/Funcs/others.pm

/home/user/cgi/Vars/errors.pm
/home/user/cgi/Vars/others.pm

/home/user/cgi/script.cgi


Ich möchte in der Datei script.cgi eine &Error::Trace() Funtion aufrufen und zwar dann, wenn sie definiert ist.

In diesem Fall sollte die Funktion meiner Meinung nach wegen des Kommentars nicht aufgerufen werden, oder?

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11

...

# script.cgi
#
use package Funcs::others;
#use package Funcs::errors;

if (defined &Error::Trace) {&Error::Trace();}

&Betta::Hallo();
...


Im Package others.pm rufe ich die &Error::Trace() auf:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28

...

# others.pm
#

use package errors;

package Alpha;

sub Hallo {

 &Error::Trace();

 return 0;

};

pacage Betta;

sub Hallo {

 # irgendwas
 
 return 0;

};

1;


Also, beim Aufrufen des script.cgi spielt meine if-Afrage keine Rolle. &Error::Trace() in der Zeil 8 wird immer ausgeführt...

Danke für die Tipps.
:::bona mente:::

View full thread Perl 5.6.1 (Pakete, Bibliotheken und Module)