Bonjour,
Je suis un chercheur en biologie et j'aimerais savoir comment faire pour mettre un fichier de nombres exemple: plusieurs lignes de chiffres sur une seul colonne, dans un tableau et ensuite récupérer le dernier chiffre pour le soustraire a l'avant dernier ainsi de suite. Merci pour votre aide précieuse.
Bonjour,
pour mon stage je dois créer un programme perl pour superviser le réseau. J'ai déjà codé les scripts perl qui effectuent des requêtes SNMP sur les switchs et routeurs. J'ai donc les infos nécessaires pour m'attaquer à la présentation de ces données, cependant je dois les rendre visibles dans un navigateur. Je me suis un peu renseigné et j'ai trouvé Perl/CGI, mais je cherche plus UI que simplement prendre des arguments et retourner du HTML.
Lors du premier lancement de cpan sur un ordinateur, un outil de configuration se lance. Dans la plupart des cas il suffit de valider sans se poser de question toutes les réponses proposé par défaut.
Je cherche un moyen de dire à cpan si c'est son premier lancement de ne pas poser toutes ces questions mais de prendre toutes les réponses proposer par défaut afin d'intégrer ça dans un script.
j'ai un mal torride à faire se lancer un script perl depuis un script
shell de /etc/init.d ... (sur une vieille Red Hat -noyau 2.4- que je pense
étrangère au souci)
Si j'execute à la main /etc/init.d/script.sh start , ça roule : le script
perl est bien lancé
(il est lancé avec la forme
su - pouet -c "cd /path && ./script.pl" &
)
Si je remplace le contenu du script shell (lanceur) par un bête date >> /tmp/date_boot, (...)
Je dispose de code Java que je voudrais réécrire en Perl, et j'ai toutes les peines du monde sur la fonction longHashcode(String str) que voici :
public static long longHashCode(String str) {
long h = 0;
byte val[] = str.getBytes();
int len = str.length();
for (int i = 0; i
h = 31 * h + val[i];
return h;
}
Voici deux exemples de ce que me renvoie ce code pour deux entrées :
short_string => 3010251491749729588 rather_longer_longer_string => (...)
Je souhaite récupérer la liste des groupes d'un utilisateur (je parle bien d'une liste des groupes et pas seulement le groupe principal).
1/ Je ne peux pas faire de open(FD_IN, '
2/ Ma solution de secours c'est de faire un `id login` et de récupérer la liste, mais j'aimerais un truc un peu plus propre :)
J'ai trouvé un getgrname mais ça ne donne que le groupe principal. Existe-il une fonction dédiée ?
je me suis mise au perl et j'ai quelques soucis ...
dans un fichier je cherche le premier mot clé d'une ligne (les autres même mots clés des autres lignes m'importe peu..)
comment puis je extraire cette ligne? jai essayer avec 'index' mais....
si j'utilise index comment puis je lui dire que c'est que le premier mot clé et non pas chaque apparition de ce mot?
Comment faire passer les méta caractère tel que "(" dans le script suivant :
#!/usr/bin/perl -w
$who = `who | grep -v \(:`;
print "$who";
J'aimerais reprendre ce bout de code pour faire mon watchlog perso... mais il bloque à la parenthèse après le grep.
Dans le shell cette commande fonctionne très bien.
Newbies en perl, j'essaye d'introduire un division dans une modification de script. Celle ci fonctionne mais me donne un chiffre à virgule.
for ( $u = 1 ; $u
# Average with the upper number
$userCheckOutaverage[$u] = $userCheckOutElapsed[$u] / $maxFeat ;
WriteToScreenAndFile( \*REPORTFILE, sprintf( '%-30s %5d %15ss ',
$userName[$u], $userCheckOutTotal[$u], $userCheckOutaverage[$u] ) ) ;
}
Comment faire pour que $userCheckOutaverage[$u] soit un entier sans virgule?
J'ai un script Perl qui se balade dans les répertoires (c'est un script tout con de création de listes de lecture) et j'ai un problème de chemin symbolique avec Perl :
j'ai un répertoire /home/truc/mp3* dont j'ai fait un lien symbolique vers /home/luc/Desktop/mp3
Mon problème est que lorsque je lance le script Perl dans le lien (donc /home/luc/Desktop/mp3) et que je veux écrire les listes dans le répertoire supérieur, il remonte dans le répertoire réel, à savoir (...)
J'ai besoin d'ecrire un programme qui lit un fichier texte contenant entre 50 et 500 Mo de nombre entier (sous forme texte) dans un tableau a 3 dimensions (mais je peux survivre avec une seule dimension) et ensuite faire certains calculs dessus.
La taille maximum theorique en C avec des entiers 32 bits serait a peu pres de 3-400 Mo, malheureusement, j'atteins des tailles de 9-10 Go simplement avec des tableaux 2 dimensions (trop de reference anonyme a d'autre (...)
Je suppose que mon cas est trivial, malheureusement ça fait plusieurs années que je n'ai pas pratiqué les expressions rationnelles et du coup, j'ai un peu perdu la main.
J'ai l'intention de créer une expression pour enlever la balise html qui contient un attribut dont le mot-clé est "language" et la valeur "fr", ainsi que le contenu délimité par ces balises (dans cet exemple, faire sauter la deuxième ligne, tout simplement).
Nous éditons un logiciel qui inclut du Perl. Nous utilisons notamment des modules du CPAN sous double licence Artistic et GPL.
Ma boite veut pouvoir distribuer ce logiciel sous licence propriétaire (oui je sais, mais la route est encore longue avant l'acceptation. J'ai déjà eut du mal a faire utiliser des logiciels libre...)
=> Est-ce possible d'avoir une licence proprio sur des scripts qui utilisent des modules sous licence libre?
Avec la licence Artistic, ça semble possible, mais j'ai (...)
J'ai un script qui fonctionnait bien avant la mise à jour en ubuntu 9.04.
Ce script qui fait des comparaisons de date entre la sortie et l'entrée de jetons, plante avec le message d'erreur suivant :
Can't open perl script "centre": Aucun fichier ou dossier de ce type
Le mot "centre" n'est pas présent dans le script, je ne comprend pas d'où vient cet appel.
Le script dépend des module Date-Pcalc-1.2 que j'ai installé, et aussi des paquetages libdate-manip-perl
ça fait plusieurs heures que je cherche l'expression régulière qui va bien du cas suivant;
a#TOTO=ok
b#JOJO
c#TITI=machin
...
et qui doit donner en résultat:
a=ok
b
c=machin
...
dans le texte: virer la partie #LENOM mais pas ce qu'il y a après le '=' s'il existe...
j'y arrive, mais en deux expressions - j'aimerais le faire en une seule - et qui sont:
s/#.*=/=/;
s/#.*//;
Cela ne fonctionne pas trop mal, mais je bloque sur certaines parties, notamment pour faire des remplacements avec des regex sur des zones de texte s'étendant sur plusieurs lignes.
Dans ma recette, j'ai cela :
Markup ('txt2tags_verbatimline' , 'directives', '/``` (.*?)/', "<:pre>1ドル");
Ce qui permet d'ajouter la balise PRE à tout texte compris entre 2 `, par exemple
Est-ce vraiment possible de faire cela ?
je dois réaliser un script perl sous windows (si si, obligé) pour lancer des commandes sous des linux. Jusque la, pas de probleme, avec un peu de gestion processus (IPC::open2) je peux lancer des commandes et accepter automatiquement le/les nouveau serveurs.
Mais ma grande question est la :
je dois lancer certaines commandes en root, et dans mon cas précis, pas d'autres choix que de faire des sudo alors. Je (...)