Return to loncommon.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.559, 2007/08/08 19:13:43 | version 1.560, 2007/08/11 14:22:14 |
---|---|
Line 5996 sub record_sep { | Line 5996 sub record_sep { |
} else { | } else { |
my @allfields; | my @allfields; |
if ($env{'form.upfiletype'} eq 'semisv') { | if ($env{'form.upfiletype'} eq 'semisv') { |
@allfields=split(/;/,$record,-1); | @allfields=split(/\s*;\s*/,$record,-1); |
} else { | } else { |
@allfields=split(/\,/,$record,-1); | @allfields=split(/\s*\,\s*/,$record,-1); |
} | } |
my $i=0; | my $i=0; |
my $j; | my $j; |