projects
/
webpac2
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
diploma work
[webpac2]
/
conf
/
isi
/
tables-cropsy.pl
1
2
my @c1 = rec_array ('C1');
3
my @rp = rec_array ('RP');
4
foreach my $au ( rec_array('AU') ) {
5
row( 'cropsy',
6
ut => rec('UT'),
7
au => $au,
8
c1 => shift @c1,
9
rp => shift @rp,
10
tc => rec('TC'),
11
py => rec('PY')
12
)
13
}
14