Discussion :

[djibril]

Bonjour,

J'ai un problème assez incompréhensible. Si quelqu'un a la solution, je suis preneur.
J'ai un programme qui contient de la documentation POD. Malheureusement, en ligne de commande, cette dernière ne s'affiche pas sous Linux. Sous Windows, il n'y a aucun souci.
Afin que vous puissiez reproduire (si possible le problème), voici un exemple de programme pod.pl :

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
#!/usr/bin/perl
use warnings;
use strict;
use Carp;
use Pod::Usage;
 
pod2usage( -verbose => 2 );
 
__END__
 
=head1 NAME
 
test.pl - Exemple de documentation
 
=cut

Sous Windows, si je lance ce programme des façons suivantes, c'est ok :

Code :

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

1
2
3
4
5
6
7
8
>perldoc pod.pl
NAME
    test.pl - Exemple de documentation
 
 
>perl pod.pl
NAME
    test.pl - Exemple de documentation

Sous Linux - sur deux serveurs Debian 7.5 et une Suse, j'ai ceci :

# perldoc pod.pl
No documentation found for "pod.pl".

# perl pod.pl
#!/usr/bin/perl
use warnings;
use strict;
use Carp;
use Pod::Usage;

pod2usage( -verbose => 2 );

__END__

=head1 NAME

test.pl - Exemple de documentation

=cut

En utilisant perldoc, il me dit qu'il n'y a pas de documentation, en utilisant le module Pod::Usage, il m'affiche le programme entier. Je ne trouve pas le souci.
La syntaxe est correcte :

# podchecker pod.pl
pod.pl pod syntax OK.

Le programme pod.pl ne contient pas de ^M (j'ai fait un dos2unix dessus).

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
# cat -t pod.pl
#!/usr/bin/perl
use warnings;
use strict;
use Carp;
use Pod::Usage;
 
pod2usage( -verbose => 2 );
 
__END__
 
=head1 NAME
 
test.pl - Exemple de documentation
 
=cut

Le perldoc est issu de l'installation du paquet debian perl-doc.

perldoc fonctionne car je peux lire la documentation des modules standards (perldoc File::Copy, perldoc File::Spec...)

Une idée car je sèche ?

[Philou67430]

Sur Ubuntu 12.04, aucun soucis pour afficher la doc avec perldoc.

Code :

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

1
2
$ perldoc -V
Perldoc v3.15_04, under perl v5.014002 for linux

[djibril]

J'ai la même version de perldoc que toi :

# perldoc -V
Perldoc v3.15_04, under perl v5.014002 for linux

Je ne comprends mon souci

[Philou67430]

As-tu essayé :
- de mettre les droits "x" sur le script (pour tous)
- de lancer "perldoc ./test.pl"

[djibril]

oui, chmod +x, voir 777, rien n'y fait !

[Philou67430]

Et ceci :

Code :

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

perldoc -m ./test.pl

[djibril]

pareil ! Avec perldoc -lm ou perldoc -m.

[djibril]

# perldoc -D pod.pl
Ending switch processing. Args are [pod.pl] with 0 errors.
/usr/bin/perldoc => Pod::Perldoc v3.15_04

Formatter class Pod::Perldoc::ToMan successfully loaded!
Will format with the class Pod::Perldoc::ToMan
Searching for pod.pl
Looking for pod.pl in /usr/bin /etc/perl /usr/local/lib/perl/5.14.2 /usr/local/share/perl/5.14.2 /usr/lib/perl5 /usr/share/perl5 /usr/lib/perl/5.14 /usr/share/perl/5.14 /usr/local/lib/site_perl . /usr/local/sbin /usr/local/bin /usr/sbin /usr/bin /sbin /bin
No documentation found for "pod.pl".


# perldoc -lm pod.pl
No module found for "pod.pl".

# perldoc pod.pl
No documentation found for "pod.pl".

[Philou67430]

Serait-ce lié au fait que ce sont des serveurs ? (j'ai lu dans la doc de perldoc qu'il souffrait de failles de sécurité).

[djibril]

Ce qui est bizarre, c'est que ça fonctionne pour mes modules standard et même pour des anciens programmes que j'ai réalisé il y a plusieurs mois.

[Philou67430]

Le dossier courant à les droits en r et x ?

[djibril]

je suis dans le répertoire root

[Philou67430]

Tu as essayé en le déplaçant dans un autre répertoire (style /var ou /tmp) ? 'fin, c'est des idées à la con, hein

[djibril]

Une idée à la con qui fonctionne .

cp /root/pod.pl /tmp
cd /tmp && perldoc pod.pl

Et ça fonctionne

[Philou67430]

Il y a peut-être, sous root, des droits qui limite certains usage ...
Peux-être aussi que perldoc essaye d'écrire dans le dossier courant, et qu'il ne peut le faire à cause d'une limitation des droits ...
je ne sais pas non plus expliquer pourquoi ...

Tu devrais poser la question dans le forum Linux ?