Back to task

54 symbols perl
Sun Jun 22 23:00:12 2014 avkhozov
#!/usr/bin/perl -nla
$h{$F[0]}+=$F[1]}{print"$_ $h{$_}"for sort keys%h


Leave a comment

Parsed as Markdown

Login to leave a comment