| Aricoh |
Hello,
je vous explique vite fait le topo. Au boulot, on est sous 98 et w2k et régulièrement, on s'apperçoit qu'il manque des fichiers sur nos bécanes, ou que des messages sont consultés en notre absence
j'aimerais concevoir un petit programme qui se lancerait au start de la machine et qui ne ferait qu'indiquer dans un petit fichier planqué le jour du lancement de la machine, l'heure et le nom d'utilisateur se connectant.
manque de chance, je ne maitrise pas suffisamment le C, je sais faire ce prog en Perl mais pb avec Perl, si notre mystérieux gugusse ouvre le script, tout est en clair dedans et tous nos postes n'ont pas Perl d'installé en local
j'aimerais donc si possible que qq me produise l'équivalent en C du source Perl suivant :
----------------------------------------------------------
open(LOG, ">>toto.log" ) or die();
print LOG Date(), " - ", Heure(), " - ";
if (%ENV{USERNAME}) {
print LOG %ENV{USERNAME}, "\n";
} else {
print LOG "anonymous user\n";
}
close(LOG);
sub Date {
my ($Sec,$Min,$Heure,$Mjour,$Mois,$Annee,$Sjour,$Ajour,$Isdst) = localtime(time);
$Annee += 1900;
$Mois += 1;
return $Mjour . '/' . $Mois . '/' . $Annee";
}
sub Heure {
my ($Sec,$Min,$Heure,$Mjour,$Mois,$Annee,$Sjour,$Ajour,$Isdst) = localtime(time);
return $Heure . ':' . $Min . ':' . $Sec;
}
------------------------------------------------ |
