use strict;

my %count;

while( <DATA> ) {
	chomp;
	$count{ $_ }++;		
}

print "$_\t$count{ $_ }\n" for keys %count;

__DATA__
123  56
123  56
234  45
123  56
678  93
678  93


##</code><code>##

678  93 2
234  45 1
123  56 3

##</code><code>##

678  93
        1
678  93 1
123  56
        3
234  45
        1