Hi
for counting unique things, hashes are your friends.
This does not produce excatly what you showed but it should
get you started (I hope)

use strict;
use warnings;

my %ch;

while (<DATA>) {
    chomp;
    my ($logon, $ip) = split;
    $ch{"$logon -- $ip"}++;
}

foreach my $key (keys %ch) {print "$key -- $ch{$key}\n"};

__DATA__
xzc6548 192.168.10.5
xzc6548 192.168.10.5
xzc6548 192.168.10.10
[download]

BTW. SAS Proc print does not do the coundting, you would
have to use a Proc Freq for this.
si_lence