Subroutine new() redefined (Seite 2) (Allgemeines zu Perl)

[thread]11908[/thread]

Subroutine new() redefined (Seite 2)

2008-05-25 19:09

User since
2003-08-04
12209 Artikel
Admin1

pktm+2008-05-25 09:13:12--
Ich hab hier mal alle Codes hochgeladen.

offensichtlich hast du alle packages in einer datei? dann ist es klar. verwende statt 'use base'
@ISA.

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

pktm

2008-05-25 19:14

User since
2003-08-07
2921 Artikel
BenutzerIn

pq+2008-05-25 17:09:31--
pktm+2008-05-25 09:13:12--
Ich hab hier mal alle Codes hochgeladen.

offensichtlich hast du alle packages in einer datei? dann ist es klar. verwende statt 'use base'
@ISA.

Nene, TreebankViewer.pm und DataSource.pm sind zwei verschiedene Dateien:
./TreebankViewer.pm
./TreebankViewer/DataSource.pm
./instanz.pl
./konfig.pl

http://www.intergastro-service.de (mein erstes CMS :) )

Struppi

2008-05-26 09:25

User since
2006-02-17
628 Artikel
BenutzerIn

pktm+2008-05-25 09:13:12--
Funktionieren tut es ja, nur wenn ich in meinem Editor das Mdoule TreebankViewer.pm selbst "ausführe", dann kommen diese Fehler.

Wie wird denn ein Modul ausgeführt? Da liegt das Problem eher am Editor und du kannst diese Fehlermeldung ignorieren.

pktm

2008-05-26 10:25

User since
2003-08-07
2921 Artikel
BenutzerIn

Struppi+2008-05-26 07:25:40--
pktm+2008-05-25 09:13:12--
Funktionieren tut es ja, nur wenn ich in meinem Editor das Mdoule TreebankViewer.pm selbst "ausführe", dann kommen diese Fehler.
Wie wird denn ein Modul ausgeführt? Da liegt das Problem eher am Editor und du kannst diese Fehlermeldung ignorieren.

Na, mit perl -c TreebankViewer.pm kannst du auch Module testen.

Quote
pktm@Schaukel:~/workspace/statmt> perl -c TreebankViewer.pm
Subroutine new redefined at TreebankViewer.pm line 43.
Subroutine dbx redefined at TreebankViewer.pm line 69.
Subroutine zeichne redefined at TreebankViewer.pm line 91.
Subroutine parse_tree_top_down redefined at TreebankViewer.pm line 159.
Subroutine parse_tree_top_down_recursive redefined at TreebankViewer.pm line 179.
Subroutine run redefined at TreebankViewer.pm line 238.
Subroutine _tkInit redefined at TreebankViewer.pm line 262.
Subroutine filtereSatzIds redefined at TreebankViewer.pm line 374.
Subroutine satzFrame_ListboxSelect redefined at TreebankViewer.pm line 396.
Subroutine exitApplication redefined at TreebankViewer.pm line 443.
Subroutine setzeGuiZurueck redefined at TreebankViewer.pm line 459.
TreebankViewer.pm syntax OK

Da das auch in der Konsole kommt, wird es wohl nicht am Editor liegen.

http://www.intergastro-service.de (mein erstes CMS :) )

Struppi

2008-05-26 12:37

User since
2006-02-17
628 Artikel
BenutzerIn

Das kann aber nicht so sein, wenn es so ist wie du es beschreibst, wenn man in deinem Beispiel Code alles unrelevantes (für dieses Problem) rauschmeißt) kommt bei mir nur syntax ok.

EDIT: was mir gerade auffällt, der Grund liegt natürlich in dem use base qw/TreebankViewer/; (das du im nopaste auskommentiert hast). Das ist auch irgendwie komisch, ein Untermodul hat das Hauptmodul als Base Klasse? Ein seltsames Konstrukt und führt natürlich zu den von dir beschriebenen Warnungen.

2008-05-26 13:06

User since
2003-08-04
12209 Artikel
Admin1

ja, vor allem:

Code: (dl )

package TreebankViewer;
...
use TreebankViewer::DataSource;

package TreebankViewer::DataSource;

use base qw/TreebankViewer/;

daher wird wohl die warnung kommen. du solltest schon wissen, was du benutzen willst.
ein modul, welches eine klasse lädt, die von der eigenen erbt, ist schon komisch.

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

View all threads created 2008-05-23 21:00.