Programmation

Afficher le schéma d’une base SQLite en Perl

Posted by admin on 13 janvier 2009 at 11:02

#!/usr/bin/perl use strict; use DBI; #Définition des arguments de connexion my $dbargs = {AutoCommit => 0, PrintError => 1}; #Connexion à la base SQLite my $dbh1 = DBI->connect(« dbi:SQLite2:dbname=/chemin/db », » », » »,$dbargs); #Affichage du message d’erreur si c’est le cas if ($dbh1->err()) { die « $DBI::errstr\n »; } #Préparation de la requête my $sSql= « SELECT * FROM SQLITE_MASTER »; my $statement = [...]

[SCRIPT NAGIOS] Monitorer les sauvegardes

Posted by admin on 11 décembre 2008 at 10:05

Pour vérifier mes sauvegardes Linux, j’ai créé un plugin nagios. Je place le code erreur dans un fichier. Puis lorsque Nagios vient executer le plugin, celui-ci lui renvoie le code erreur situé dans le fichier avec un message. Utilisation du plugin dans Nagios : $USER1$/check_sauvegarde.pl -serveur $HOSTNAME$ Hostname correspond au nom du serveur dans NAGIOS [...]

[Script Nagios] Vérifier la récupération des emails en POP sur Mdaemon en VBS

Posted by admin on 28 novembre 2008 at 12:26

Je mets ce script ici pour me permettre de le retrouver si je perds la mémoire :p. Peut-être que ça servira à quelqu’un. Il a été intégré à Nagios grâce au code erreur en sortie puis exécuté par le check_nrpe. Ce script est au format wsf.   <package> <job id="Application Script"> <comment>           File: Application.wsf [...]

Connaitre la taille d’un tableau :

Posted by admin on 22 juillet 2008 at 4:02

source = (test test2); # création du tableau avec deux entrées echo ${#source[*]};    # On affiche la taille du tableau 2                                # Résultat de l’echo

Rediriger dans une variable la sortie STDERR en SHELL

Posted by admin on 11 juillet 2008 at 2:16

SORTIE=`tar -czvf /home/MonHome.tar.gz /tmp/ 2>&1` Tu as dans $SORTIE ce que t’a renvoyé la commande tar. echo $SORTIE

Script de migration IP fixe vers DHCP Windows

Posted by admin on 25 juin 2008 at 8:35

A mettre dans un fichier .bat : netsh interface ip set address name="Connexion au réseau local" source=dhcp netsh interface ip set dns name="Connexion au réseau local" source=dhcp ipconfig /release ipconfig /renew Attention : il y’a un problème avec les accents. Je vous conseil d’editer le script avec la commande edit de l’invite de commande pour [...]

Installer Symfony

Posted by admin on 16 avril 2008 at 2:58

Symfony est un framework pour php. Pré-requis : php-pear = gestionnaire de library phpphp5php-xml Installation : $ pear channel-discover pear.symfony-project.com$ pear install symfony/symfony On teste si symfony est bien installé : $ symfony -V On regarde où a été installé symfony : $ find / -name « symfony » -print

Convertir Date en lettre

Posted by Olivier Legras on 31 mars 2008 at 1:06

<?php echo MySQLDateToExplicitDate(date(‘Y-m-d’)); Function MySQLDateToExplicitDate($MyDate, $WeekDayOn=1, $YearOn=1) { $MyMonths = array(« Janvier », « Février », « Mars », « Avril », « Mai », « Juin », « Juillet », « Août », « Septembre », « Octobre », « Novembre », « Décembre »); $MyDays = array(« Dimanche », « Lundi », « Mardi », « Mercredi », « Jeudi », « Vendredi », « Samedi »); $DF=explode(‘-’,$MyDate); $TheDay=getdate(mktime(0,0,0,$DF[1],$DF[2],$DF[0])); $MyDate=$DF[2]. » « .$MyMonths[$DF[1]-1]; if($WeekDayOn){$MyDate=$MyDays[$TheDay["wday"]]. » « .$MyDate;} if($YearOn){$MyDate.= » « .$DF[0];} return $MyDate; } ?> Source : http://www.phpinfo.net/page/archives/astuces/php/date-heure/

Projet SYSLOG

Posted by admin on 13 mars 2008 at 11:59

Configuration Syslogd : Voici mon fichier syslog.conf : # Log all kernel messages to the console. # Logging much else clutters up the screen. #kern.*                                                 /dev/console # Log anything (except mail) of level info or higher. # Don’t log private authentication messages! #*.info;mail.none;authpriv.none;cron.none               /var/log/messages local1.*                                                /log/site1/all.log local2.*                                                /log/site2/all.log # The authpriv file has restricted access. [...]

Comment supprimer les doublons d’une liste ou d’un tableau ?

Posted by Olivier Legras on 19 février 2008 at 12:21

Utilisez une table de hachage. Lorsque vous pensez à « unique » ou à « doublons », pensez aux « clés de hachage ». Si l’ordre des éléments ne compte pas, vous pouvez créer une table de hachage dont vous extrairez les clés. La manière de créer la table de hachage importe peu : il vous suffit d’utiliser keys pour récupérer [...]