$users{$1}++ if $line =~ /Login succeeded. User: (\w+)/i;