Hébergeur de fichiers indépendant

check ne.pl

À propos

Type de fichier
Fichier PL de < 1 Ko (text/x-perl)
Confidentialité
Fichier public, envoyé le 10 décembre 2015 à 17:12, depuis l'adresse IP 195.154.x.x (France)
Sécurité
Ne contient aucun Virus ou Malware connus - Dernière vérification: 15 heures
Statistiques
La présente page de téléchargement a été vue 240 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

Télécharger check_ne.pl

Télécharger le fichier (< 1 Ko)