($N,$M)=split$",<>; $/=$"; ++$h{<>}for 2..$N; ($a,$b)=split"\n",<>; ++$h{$a.$"}; print$h{$b}+0,$"; print$h{<>}+0,$"for 3..$M; ($a)=split"\n",<>; print$h{$a.$"}+0