Discussion :

[Premium]

Salut,

pour m'entrainer, j'ai voulu créer un module et l'utiliser.
Voici le fichier MonModule.pm

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
package MonModule;
use strict;
 
sub TableMult{
    my($n) = @_;
    for my $i(1..$n){
	for my $j(1..$n){
	    printf("%5d",$i*$j);
    }
	printf("\n");
}
 
1;

et le fichier Exo.pl

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
#!/usr/bin/perl -w
use strict;
use MonModule;
 
MonModule::TableMult(4);

A la compilation, j'ai ce message :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
~$ ./Exo.pl
Missing right curly or square bracket at MonModule.pm line 14, at end of line
syntax error at MonModule.pm line 14, at EOF
Compilation failed in require at ./Exo.pl line 3.
BEGIN failed--compilation aborted at ./Exo.pl line 3.