diff options
| author | Eugeniy E. Mikhailov <evgmik@gmail.com> | 2021-03-18 10:31:05 -0400 |
|---|---|---|
| committer | Eugeniy E. Mikhailov <evgmik@gmail.com> | 2021-03-18 10:31:05 -0400 |
| commit | d28fb96fb44c6bc338cf08a6eb1eba3c307935f4 (patch) | |
| tree | 0832694837b87e3e9d926e8029502cb0bc01595f /banner2csv.pl | |
| parent | 6308e617e6e71e3b8a4ee02a3be98bf46069bb35 (diff) | |
| download | GradeBook-d28fb96fb44c6bc338cf08a6eb1eba3c307935f4.tar.gz GradeBook-d28fb96fb44c6bc338cf08a6eb1eba3c307935f4.zip | |
reflect banner format change
Diffstat (limited to 'banner2csv.pl')
| -rwxr-xr-x | banner2csv.pl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/banner2csv.pl b/banner2csv.pl index 31dccc1..c09135f 100755 --- a/banner2csv.pl +++ b/banner2csv.pl @@ -138,19 +138,19 @@ sub spantag_end_handler # and really get the proper one foreach $row ($te->rows) { #student name - $aparser->parse(@$row[1]); + $aparser->parse(@$row[2]); $name=$parsed_text; ($lname, $fname)=split(',', $name); $fname =~ s/^ //; #student id - #print @$row[2]; - $spanparser->parse(@$row[2]); + #print @$row[3]; + $spanparser->parse(@$row[3]); $sid=$parsed_text; - #student name - $aparser->parse(@$row[7]); + #student email + $aparser->parse(@$row[10]); $email = $href; $email =~ s/mailto://; |