Perles de Mongueurs

Magazine
Marque
GNU/Linux Magazine
Numéro
121
Mois de parution
novembre 2009


Résumé

Depuis le numéro 59, les Mongueurs de Perl vous proposent tous les mois de découvrir les scripts jetables qu’ils ont pu coder ou découvrir dans leur utilisation quotidienne de Perl. Bref, des choses trop courtes pour en faire un article, mais suffisamment intéressantes pour mériter d’être publiées. Ce sont les perles de Mongueurs.


Body

Désinstaller un module

Une question qui revient de temps en temps sur les listes et forums est de savoir comment désinstaller un module installé à la main ou avec le shell CPAN. Il est vrai que comme on a très rarement besoin de véritablement retirer un module du système de fichiers, cette opération n'est pas bien documentée.

Mais d'abord, une petite précision technique : lorsqu'on installe un module en utilisant Makefile.PL ou Build.PL, ceux-ci enregistrent tous les fichiers ajoutés dans un fichier .packlist. Effacer ces fichiers est donc aussi simple que rm `cat /path/to/.packlist`.

Le souci est par contre de savoir où est situé ce fichier, car il est lui-même stocké dans l'arborescence des modules Perl. Il y a bien sûr une logique de placement. Mais, sans surprise, il existe un module, livré avec Perl depuis la version 5.5, dont c'est précisément le rôle. Nommé de manière assez logique ExtUtils::Installed, ce module peut être utilisé de la manière suivante pour écrire un désinstalleur très simple :

    #!/usr/bin/perl

    use strict;

    use ExtUtils::Installed;

     

    my $mod = $ARGV[0] || die "usage: $0 Module\n";

    my $inst = ExtUtils::Installed->new();

    unlink $inst->files($mod), $inst->packlist($mod)->packlist_file();

Petite explication. L'objet ExtUtils::Installed créé permet directement d'avoir la liste des fichiers correspondant à un module grâce à la méthode files(), mais celle-ci omet néanmoins le fichier .packlist. $inst->packlist($mod) fournit l'objet ExtUtils::Packlist correspondant et la méthode packlist_file() demande à l'objet son propre chemin. On n'a plus qu'à passer tout cela à la fonction unlink() et le tour est joué.

Les plus attentifs auront remarqué que ce n'est pas tout à fait vrai, car il reste les répertoires, maintenant vides. Et les quelques utilisateurs de VMS voudront leur boucle sur le unlink() pour effacer toutes les révisions. Toutes ces personnes ont raison. Mais, il s'agissait ici de montrer un exemple simple et facile à recopier. Ceux qui veulent un utilitaire plus complet pourront le trouver dans la documentation de ExtUtils::Packlist... où ils peuvent aussi utiliser CPANPLUS, qui intègre une commande uninstall.

http://perldoc.perl.org/ExtUtils/Packlist.html#EXAMPLE

À vous !

Envoyez vos perles à perles@mongueurs.net. Elles seront peut-être publiées dans un prochain numéro de GNU/Linux Magazine.

 



Article rédigé par

Par le(s) même(s) auteur(s)

Brèves de Perl

Magazine
Marque
GNU/Linux Magazine
Numéro
119
Mois de parution
septembre 2009
Résumé

Les Mongueurs de Perl, l'Association Francophone Python (AFPy) et Ruby France sont heureux de vous inviter à la première Open Source Developer Conference France (OSDC.fr), qui se tiendra à la Cité des Sciences et de l'Industrie, à Paris, les 2 et 3 octobre 2009. L'entrée est libre et gratuite.

PyCON Fr 2009

Magazine
Marque
GNU/Linux Magazine
Numéro
119
Mois de parution
septembre 2009
Résumé
Troisième édition du rendez-vous de la communauté Python, comme chaque année à la Cité des Sciences à Paris, les 30 et 31 mai 2009. Environ deux cents participants et une trentaine de présentations pour deux jours consacrés à ce langage.

Les derniers articles Premiums

Les derniers articles Premium

Le combo gagnant de la virtualisation : QEMU et KVM

Magazine
Marque
Contenu Premium
Spécialité(s)
Résumé

C’est un fait : la virtualisation est partout ! Que ce soit pour la flexibilité des systèmes ou bien leur sécurité, l’adoption de la virtualisation augmente dans toutes les organisations depuis des années. Dans cet article, nous allons nous focaliser sur deux technologies : QEMU et KVM. En combinant les deux, il est possible de créer des environnements de virtualisation très robustes.

Brève introduction pratique à ZFS

Magazine
Marque
Contenu Premium
Spécialité(s)
Résumé

Il est grand temps de passer à un système de fichiers plus robuste et performant : ZFS. Avec ses fonctionnalités avancées, il assure une intégrité des données inégalée et simplifie la gestion des volumes de stockage. Il permet aussi de faire des snapshots, des clones, et de la déduplication, il est donc la solution idéale pour les environnements de stockage critiques. Découvrons ensemble pourquoi ZFS est LE choix incontournable pour l'avenir du stockage de données.

Générez votre serveur JEE sur-mesure avec Wildfly Glow

Magazine
Marque
Contenu Premium
Spécialité(s)
Résumé

Et, si, en une ligne de commandes, on pouvait reconstruire son serveur JEE pour qu’il soit configuré, sur mesure, pour les besoins des applications qu’il embarque ? Et si on pouvait aller encore plus loin, en distribuant l’ensemble, assemblé sous la forme d’un jar exécutable ? Et si on pouvait même déployer le tout, automatiquement, sur OpenShift ? Grâce à Wildfly Glow [1], c’est possible ! Tout du moins, pour le serveur JEE open source Wildfly [2]. Démonstration dans cet article.

Les listes de lecture

9 article(s) - ajoutée le 01/07/2020
Vous désirez apprendre le langage Python, mais ne savez pas trop par où commencer ? Cette liste de lecture vous permettra de faire vos premiers pas en découvrant l'écosystème de Python et en écrivant de petits scripts.
11 article(s) - ajoutée le 01/07/2020
La base de tout programme effectuant une tâche un tant soit peu complexe est un algorithme, une méthode permettant de manipuler des données pour obtenir un résultat attendu. Dans cette liste, vous pourrez découvrir quelques spécimens d'algorithmes.
10 article(s) - ajoutée le 01/07/2020
À quoi bon se targuer de posséder des pétaoctets de données si l'on est incapable d'analyser ces dernières ? Cette liste vous aidera à "faire parler" vos données.
Voir les 64 listes de lecture

Abonnez-vous maintenant

et profitez de tous les contenus en illimité

Je découvre les offres

Déjà abonné ? Connectez-vous