Bonjour

J'ai un fichier texte avec le contenu suivant:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Windows Firefox 2007/11/19 00:10:55
Windows Firefox 2007/11/19 00:15:10
Windows MSIE 2007/11/20 07:01:50
A partir de ces informations, je souhaiterai afficher ces données sous cette forme:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
Firefox: 2
MSIE: 1
Je récupère ces infos via un module dont voici un extrait de code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
sub browser
{
	our $browser=$ENV{'HTTP_USER_AGENT'};
	if ($ENV{'HTTP_USER_AGENT'} =~ m/MSIE/)
	{
		$browser="MSIE";
	}
 
	elsif ($ENV{'HTTP_USER_AGENT'} =~ m/Firefox/)
	{
		$browser="Firefox";
	}
}
Bien entendu, une fonction est consacrée à recueillir l'os et la date.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
my @infos=("$Stats::user_ip","$Stats::user_host","$Stats::os","$Stats::browser","$Stats::lang","$Stats::date");

open (FILE, "$logfile");
my @browser=("MSIE", "Firefox");
while (<FILE>)
{
	$browser=@infos[3];
	foreach(@infos[3])
	{
          Instructions
	}
}
close (FILE);
Suis-je sur la bonne voie ?

Avez-vous quelques exemples ou bien une piste afin de pouvoir débuter ?

Merci