PB LCD avec Perl (Hires.pm)

[Sebastien65]

Salut,

Donc j'ai installé la version perl 5.8.3 sur CC 3 pour utiliser l'afficheur LCD (Frank78 avec le prog de Fesch)

Mais quand je le lance j'ai cette erreur :

[root@server root]# ./lcd
Can't locate loadable object for module Time::HiRes in @INC (@INC contains: /usr/lib/perl5/5.8.3/i386-linux-thread-multi /usr/lib/perl5/5.8.3 /usr/lib/perl5/site_perl/5.8.3/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.2/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.1/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.0/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.3 /usr/lib/perl5/site_perl/5.8.2 /usr/lib/perl5/site_perl/5.8.1 /usr/lib/perl5/site_perl/5.8.0 /usr/lib/perl5/site_perl /usr/lib/perl5/vendor_perl/5.8.3/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.2/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.1/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.0/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.3 /usr/lib/perl5/vendor_perl/5.8.2 /usr/lib/perl5/vendor_perl/5.8.1 /usr/lib/perl5/vendor_perl/5.8.0 /usr/lib/perl5/vendor_perl .) at ./lcd line 18
Compilation failed in require at ./lcd line 18.
BEGIN failed--compilation aborted at ./lcd line 18.

Donc j'ai rajouté le fichier HiRes.pm d'une SME mais il me sort une erreur sur "gettimeofday" donc j'ai du désactiver les lignes suivantes pour pouvoir lancer le menu du lcd sans erreur :

use Time::HiRes qw(usleep gettimeofday);

#/\/\/\/\/\/\/\/\/\/\/\/\/\
#
# High Resolution Timer
# Procedure
#
# -> Do not touch this!
#
#\/\/\/\/\/\/\/\/\/\/\/\/\/

#sub set_wait()
#{
($seconds1, $microseconds1) = gettimeofday;
&checkButtons;
}

sub make_wait()
{
&checkButtons;
my $milli = shift;
($seconds2, $microseconds2) = gettimeofday;
my $i = $milli*1000-($seconds2*1000000+$microseconds2)+($seconds1*1000000+$microseconds1);
if($i<0) {$i=0;}
usleep($i);
}

Mais je n'arrive pas a le faire marcher

[root@server root]# ./lcd -init
Undefined subroutine &main::usleep called at ./lcd line 1645.
[root@server root]#

Une idée ??

Merci

[Fesch]

Afin que le script fonctionne de manière correcte, il faut absolument que le fichier HiRes.pm soit installé (et aussi au bon endroit).

Tu dis que tu l'a installé, or il me semble donc qu'il n'est pas installé correctement, sinon cela devrait marché. Pour l'installé il faut soit le copier manuellement au bon endroit (à voir, je ne connais plus par coeur) ou utiliser les commandes insternes à Perl (Perl Command Prompt) pour réaliser le téléchargement automatique depuis les erveurs Perl.

Si tu met en commentaire la ligne qui charge le dite librairie, il est clair que le programme ne connais plus la commande "usleep". Donc forcément il faut remettre la ligne qui inclus la librairie HiRes.pm

[Sebastien65]

Salut,

Merci de ta réponse

J'ai fait un copié/collé et je l'ai placé sur les chemins que me donné l'erreur... Mais toujours pareil !

Je vais voir avec les commandes de perl si j'arrive a rajouter le module

[Sebastien65]

- re -

Bon pour Hires j'ai réussi a l'installer mais un autre problème que je n'arrive pas à résoudre :s

[root@server root]# ./lcd
Time::HiRes object version 1.55 does not match bootstrap parameter 01.20 at /usr/lib/perl5/5.8.3/i386-linux-thread-multi/DynaLoader.pm line 225.
Compilation failed in require at ./lcd line 18.
BEGIN failed--compilation aborted at ./lcd line 18.
[root@server root]#

[Fesch]

Alors peut-être que c'est la mauvaise version que tu as installée?

N'y a-t-il pas quelqu^'un d'autre qui a eut ce problème???

[zeltron]

Si moi ! Sur une ClarkConnect il n'y a effectivement pas le timer Perl de precision (faut dire que c'est pas bien utile pour une distribution dédiée serveur !).

Tu télécharges le rpm perl-Time-HiRes-1.38-3.i386.rpm (recherche par google)
Tu le poses via un partage lan ou par le ftp tu tapes "rpm -ivh perl-Time-HiRes-1.38-3.i386.rpm"
et voilà tu peux lancer le script de Fesch !!!

Par contre je te conseille de le faire sur une installation fraîche de la ClarckConnect car tu as partiellement installé le package et tu auras des messages de conflit de versions qui te seront insurmontables.

J'ai utilisé ce rpm sur une ClarckConnect 3.0 (pas encore testé sur la 3.1) et cela fonctionne du 1er coup (je n'ai pas non plus testé les versions plus récentes du rpm perl-Time-HiRes).

[zeltron]

Bon cela marche aussi avec les dernières version de la ClarkConnect.

@+