++$h{$_->[0]}; ++$h{$_->[1]}; #### print join(' ',sort keys %h),"\n";