Return to loncommon.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.503, 2007/01/23 20:00:38 | version 1.504, 2007/01/24 21:42:01 |
---|---|
Line 5394 sub record_sep { | Line 5394 sub record_sep { |
} else { | } else { |
my @allfields; | my @allfields; |
if ($env{'form.upfiletype'} eq 'semisv') { | if ($env{'form.upfiletype'} eq 'semisv') { |
@allfields=split(/;/,$record); | @allfields=split(/;/,$record,-1); |
} else { | } else { |
@allfields=split(/\,/,$record); | @allfields=split(/\,/,$record,-1); |
} | } |
my $i=0; | my $i=0; |
my $j; | my $j; |