conf/isi/cu-au-count.pl


foreach my $cr ( rec_array 'CR' ) {
        foreach my $au ( rec_array 'AU' ) {
                row(
                        cited => $cr->{author},
                        au => $au,
                );
        }
}
1
2	foreach my $cr ( rec_array 'CR' ) {
3	foreach my $au ( rec_array 'AU' ) {
4	row(
5	cited => $cr->{author},
6	au => $au,
7	);
8	}
9	}