Hope this helps.

while($input = <DATA>) {
@fields = split(" ",$input);

print "\n$fields[1] => $fields[2]";
};


__DATA__
01/03/2008 angie 53
01/03/2008 kristen 95
01/03/2008 MaryT 123
01/03/2008 Nicole 27
01/03/2008 sylvarius 33
01/03/2008 yasmin 67
02/03/2008 angie 2
02/03/2008 kristen 121
02/03/2008 MaryT 81
02/03/2008 Nicole 47
02/03/2008 sylvarius 15
02/03/2008 Tanya 22
02/03/2008 yasmin 60
03/03/2008 angie 3
03/03/2008 donna 78
03/03/2008 Kimberly 9
03/03/2008 kristen 257
03/03/2008 MaryT 181
[download]

Output

angie => 53 kristen => 95 MaryT => 123 Nicole => 27 sylvarius => 33 yasmin => 67 angie => 2 kristen => 121 MaryT => 81 Nicole => 47 sylvarius => 15 Tanya => 22 yasmin => 60 angie => 3 donna => 78 Kimberly => 9 kristen => 257 MaryT => 181