Test du système en Perl

Résolu/Fermé
dmganges Messages postés 150 Date d'inscription mercredi 29 octobre 2008 Statut Membre Dernière intervention 25 novembre 2013 - 15 févr. 2011 à 10:48
dmganges Messages postés 150 Date d'inscription mercredi 29 octobre 2008 Statut Membre Dernière intervention 25 novembre 2013 - 16 févr. 2011 à 03:47
Bonjour,
J'ai un script perl qui doit lancer une commande différente suivant que je me trouve sous Linux ou sous XP.

Comment dans ce script tester le système sur lequel je suis ?

Pardon si la question a été posée, mes recherches sur CCM et google ne donnent rien :-(

MERCI d'avance !


A voir également:

3 réponses

zipe31 Messages postés 36402 Date d'inscription dimanche 7 novembre 2010 Statut Contributeur Dernière intervention 27 janvier 2021 6 407
15 févr. 2011 à 10:58
2
dmganges Messages postés 150 Date d'inscription mercredi 29 octobre 2008 Statut Membre Dernière intervention 25 novembre 2013 19
15 févr. 2011 à 11:30
MERCI zipe31 !

Mieux vaut un qui sait que 10 qui cherchent !

En plus la page est pleine d'astuces !!

Ma petite contrib pour celles et ceux qui veulent juste faire un copier/coller :

#!/usr/bin/perl
use strict;
use Config;
{
print "$Config{osname}\n";
print "$Config{archname}\n";
}


# perl system.pl
linux
i686-linux-thread-multi
0
zipe31 Messages postés 36402 Date d'inscription dimanche 7 novembre 2010 Statut Contributeur Dernière intervention 27 janvier 2021 6 407
15 févr. 2011 à 11:32
De rien, happy for you ;-))

Mieux vaut un qui sait que 10 qui cherchent !
Ben je n'en savais rien avant que tu poses la question ;-\
0
lami20j Messages postés 21331 Date d'inscription jeudi 4 novembre 2004 Statut Modérateur, Contributeur sécurité Dernière intervention 30 octobre 2019 3 567
Modifié par lami20j le 15/02/2011 à 20:26
Salut,

Allez, pour amusement ;-)
:~$ perl -V:osname -V:archname 
osname='linux'; 
archname='i486-linux-gnu-thread-multi';


ou
:~$ perl -V::osname -V::archname
'linux';
'i486-linux-gnu-thread-multi';
0
dmganges Messages postés 150 Date d'inscription mercredi 29 octobre 2008 Statut Membre Dernière intervention 25 novembre 2013 19
16 févr. 2011 à 03:47
Bonjour lami20j,
Les poules ne sont pas levées !

MERCI, ça peut servir !

Je prépare une "extraction" de mon pb :
https://forums.commentcamarche.net/forum/affich-20856274-perl-tk-encodage-arabe

@+
0
bob031 Messages postés 8158 Date d'inscription samedi 7 août 2004 Statut Membre Dernière intervention 1 septembre 2014 472
15 févr. 2011 à 20:26
Hello,

Merci pour le lien zip

bonne pioche !

:-)
0