my $position = 1;
while (<STDIN>) {
    $myhash{$_}{'item'}++;
    $myhash{$_}{'position'} = $position++ if ! exists $myhash{$_}{'position'};
}