check ne
À propos du fichier
- Type de fichier
- Fichier de < 1 Ko (text/x-perl)
- Confidentialité
- Fichier public, envoyé le 11 décembre 2015 à 11:29, depuis l'adresse IP 195.154.x.x (France)
- Sécurité
- Ne contient aucun Virus ou Malware connus - Dernière vérification: 7 heures
- Statistiques
- La présente page de téléchargement a été vue 1065 fois depuis l'envoi du fichier
- Page de téléchargement
-
Aperçu du fichier
#! /usr/bin/perl
$file= "/root/testlog" ;
$fd_file ;
$line ;
# open ($fd_file, '<:encoding(UTF-8)', $file) or die '<:encoding(UTF-8)', or die "Could not open file '$file' $!" ;
# while (<$fd_file>)
$line = `tail -n 20 $file` ;
if ($line =~ m/[gc][old]/)
{
print "coucou tu ve voir ma bite" ;
exit(2) ;
}
else
{
print "alles gut" ;
exit(0) ;
}
Partager le fichier check_ne sur le Web et les réseaux sociaux:
Télécharger le fichier check_ne