Bonjour à tous,
je sollicite une nouvelle fois le forum, car j'ai un problème entre mes différents packages.
Ce message s'affiche lorsque j'exécute mon programme principal.
Mes différentes classes:
Code : Sélectionner tout - Visualiser dans une fenêtre à part can t locate object method "new" via package "Sql" at View.pm line 45 Compilation failed require at Sql.pm line 4
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23 #!/usr/bin/perl package View; use warnings; use strict; use Tk; use Sql; sub new { my ($class) = @_; my $this = {}; bless($this, $class); return $this; } my $sql = Sql->new(); ... 1; # Important, à ne pas oublier __END__ # Le compilateur ne lira pas les lignes après elle
Merci à ceux qui me viennent en aide.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23 #!/usr/bin/perl package Sql; use View; use warnings; use strict; use DBI; sub new { my ($class) = @_; my $this = {}; bless($this, $class); return $this; } my $view = View->new(); ... 1; # Important, à ne pas oublier __END__ # Le compilateur ne lira pas les lignes après elle
Partager