version 1.480, 2006/12/01 00:26:07
|
version 1.481, 2006/12/01 00:28:14
|
Line 5139 sub record_sep {
|
Line 5139 sub record_sep {
|
my @allfields; |
my @allfields; |
&Apache::lonnet::logthis("file type is ".$env{'form.upfiletype'}); |
&Apache::lonnet::logthis("file type is ".$env{'form.upfiletype'}); |
if ($env{'form.upfiletype'} eq 'semisv') { |
if ($env{'form.upfiletype'} eq 'semisv') { |
&Apache::lonnet::logthis("splitting on ; "); |
|
@allfields=split(/;/,$record); |
@allfields=split(/;/,$record); |
} else { |
} else { |
&Apache::lonnet::logthis("splitting on , "); |
|
@allfields=split(/\,/,$record); |
@allfields=split(/\,/,$record); |
} |
} |
my $i=0; |
my $i=0; |