Re: grupiranje csv , python ili perl

Poslao ravilov on 07.09.2010 16:34:38
Radiš... dokumente?!
Kao, baš prave fizičke datoteke na disku?
Šališ se?
A i jedan i drugi jezik imaju toliko mnogo tako divnih memorijskih struktura...

Evo otprilike kako bi to ja, u perl-u:
#! /usr/bin/perl -w
use strict;
# preskoci prva dva retka
my $dummy = <STDIN>;
$dummy = <STDIN>;
my %data = ();
while (<STDIN>) {
    s{[\r\n]+$}{}g;
    my ($a, $b, $c) = split(/;/, $_);
    $data{$a} = 0 unless defined($data{$a});
    $data{$a} += $c;
}
foreach (sort(keys(%data))) {
    print STDOUT sprintf('%d=%d', $_, $data{$_})."\n";
}


BTW, prilično mi je nevjerojatno da za nešto ovako banalno i trivijalno nema već barem 1000 tutoriala i objašnjenja na netu...

Ova poruka je od: http://www.linux.hr/newbb/viewtopic.php?forum=8&topic_id=2355&post_id=14705