Thread oop> unverständliche Fehlermeldung: bei use MeinModul; (13 answers)
Opened by DocJunioR at 2005-09-16 12:08

DocJunioR
 2005-09-16 12:08
#58089 #58089
User since
2005-08-29
53 Artikel
BenutzerIn
[default_avatar]
ich bekomme folgende Fehlermeldung
Quote
"prj::cftpwindow=HASH(0x1a73ecc)" is not exported by the prj::cftpwindow module
Can't continue after import errors at O:\perl\mars2\mars.pl line 16
BEGIN failed--compilation aborted at O:\perl\mars2\mars.pl line 16.
Drücken Sie eine beliebige Taste . . .

bei diesem Code.
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
#!/usr/bin/perl -w
############################################################
# clist.pl #

perl 5
############
# Fenster mit 2 Filelisten
#
#
#
############################################################

use strict;
use Tk;

use prj::cftpwindow

prj::cftpwindow->new ( "O:/MoniQuE" );

MainLoop();

Das cftpwindow wurde testenshalber reduziert auf:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
use strict;
use Tk;
package prj::cftpwindow;

###########################################################
# Constructor
##################
sub new
{
my $this = shift;
my $thisref = ref($this) || $this;
my $self;
$self->{window}   = MainWindow->new (-title => "FTP-Transfer");
#   $self->{leftpath} = $_[0];
#   $self->{leftdir} = undef;
#   $self->{left} = undef;
#   $self->{right} = undef;
bless ($self, $thisref);

# $self->show();
}  

Aber was ist jetzt das Problem??

View full thread oop> unverständliche Fehlermeldung: bei use MeinModul;