use autodie;

$c->do_update();

sub do_update {
    my ($c) = @_;

    for my $file ( @files ) {
        $c->process_dump_file( $file );
    }
}

sub process_dump_file {
    my ($c, $file) = @_;
    
    my @orders;
    
    open my $csv, "<", $file;
    push @orders, [ split ' , ', $_ ] while ( <$csv> );
    close $csv;
    
    shift @orders;
    
    return;
}