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.
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:
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??