<%init>
my %opt = @_;
my $part_export = $opt{part_export} || die "No part_export specified";
my @fields = ('cacti_graph_template_id','cacti_snmp_query_id','cacti_snmp_query_type_id','cacti_snmp_field','cacti_snmp_value');
my $multiopts = join(',',@fields);
my @byfield = map {
[ split("\n", $part_export->option($_)) ]
} @fields;
my @data;
for (my $i = 0; $i < @{$byfield[0]}; $i++) {
my @thisrow;
for (my $j = 0; $j < @byfield; $j++) {
push(@thisrow,$byfield[$j][$i]);
}
push(@data,\@thisrow);
}
%init>