Back to task

51 symbols perl
Fri Jun 27 16:55:48 2014 dionys
#!/usr/bin/perl -pla
$h{$F[0]}+=$F[1]}for(sort keys%h){$_.=" $h{$_}"


Leave a comment

Parsed as Markdown

Login to leave a comment