Je cherche comment faire un menu interactif sous perl.
menu simple en mode text qui avec les fleches curseurs permet de monter ou descendre une barre en sur brillance sur le choix du texte et une fois le texte choisie en appuyant la touche enter execute une commande.
Ex:
- choix 1
- choix 2
- choix 3
faite un choix
avec une barre blanche en inversion video change le texte qui est de couleur blanche en noir
J'ai un petit probleme
Voila, mon programme ci-dessous cree une frame avec 4 boutons.
Le premier (globale option) quand il est active, il active les 3 autres, sinon on active manuellement les 3 autres.
Puis selon les choix, le bouton exec prend en compte les choix et ouvre des fenetres xterm selon les choix.
Mais le probleme tous les choix sont manuels.
Quelqu'un a une solution ?
Je vous remercie d'avance.
#!/usr/bin/perl -w
use strict;
use Tk;
use Tk::FileSelect; (...)
je ne connais assez perl pour modifier le script cssh.
je souhaite faire la même chose que le script cssh mais avec telnet pas avec du ssh.
Je sais telnet n'est pas sécuriser, mais je n'ai pas le choix.
Quelqu'un peut il m'aider a adapter ce script pour faire du telnet au lieu du ssh ?
Ci-dessous le script. Merci d'avance pour toutes réponses.
#!/usr/bin/perl
my $VERSION = '$Revision: 3.19 $ ($Date: 2006年07月24日 19:12:54 $)';
Je souhaite faire un petit shell qui toutes les minutes pendant 1 heure vérifie un certain nombre de process.
- Si au bout d'une heure ( la boucle ce termine) il y a encore des process, les kill l'un après l'autre.
- Si moins d'une heure, il n'y a plus de process, sort de la boucle et fin du shell.
J'ai un doute sur mon code ? Comment faire si au bout d'une heure ils restent encore des process (...)
Voila, j'ai une appli quand elle fonctionne génère beaucoup de process.
Quand j'arrête l'appli, cela prend environ 60 minutes.
Après 1 h il reste que très peu de process que je peux killer, mais cela cree des problèmes a la base qui d'une autre commande je la répare.
Ce que je souhaite faire, c'est :
1) arrêt de l'appli 2) faire un compteur qui toute les 60s vérifie le nombre de process puis (...)
Je cherche comment faire en script perl une connexion a une base oracle et récupérer dans une table a un champ précis son contenu,
l'écrire dans un fichier txt puis écrire OK dans la table a un champ précis
nom base = ma_base
login = moi
pass = Cmoi
table = toto
champ = tata (pour la lecture)
champ = titi (pour l'ecriture)
Je ne connais pas assez le perl, car je l'apprends en ce moment.
Comment archiver un fichier sur plusieurs disquette ?
Voici mon problème:
j'ai un fichier
ex: toto.txt.zip qui fait 3.40 Mo tout zippé, je souhaite le copier sur disquette format dos, avec winzip je connais la manipe pour le faire sur faire sur plusieurs disquettes, mais sous linux ???
Et bien sur, pouvoir le restorer l'archive sur une machine windows.
j'ai des fichiers logs:
009_psaz_20060102.txt
009_psaz_20060102.txt.zip
comment faire pour savoir si c'est zip ou un txt sachant que les répertoires ou ce trouve ces logs sont nombreux.
Voici ma commande:
cd /
find . -name *20060102* -print | la suite je ne trouve pas ...
car cette commande affiche les 2 fichiers.
voici le résultat que je souhaite:
1 cherche le fichier par date *AAAAMMJJ* 2 si c'est un fichier txt ouvre le avec (...)