foreach (split /\s/, <DATA>){
    $hash{$_}++;
}

foreach $key (sort keys %hash){
   print "$key $hash{$key}\n";
}

__DATA__
SINE LINE LINE LINE SINE Alu Alu SINE

##</code><code>##

Alu 2
LINE 3
SINE 3