version 1.101, 2003/10/03 16:39:17
|
version 1.102, 2003/10/07 15:30:09
|
Line 1222 sub update_full_student_data {
|
Line 1222 sub update_full_student_data {
|
# However, there is one wrinkle: submissions which end in |
# However, there is one wrinkle: submissions which end in |
# and odd number of '\' cause insert errors to occur. |
# and odd number of '\' cause insert errors to occur. |
# Best trap this somehow... |
# Best trap this somehow... |
|
$value =~ s/\'/\\\'/g; |
my ($offensive_string) = ($value =~ /(\\+)$/); |
my ($offensive_string) = ($value =~ /(\\+)$/); |
if (length($offensive_string) % 2) { |
if (length($offensive_string) % 2) { |
$value =~ s/\\$/\\\\/; |
$value =~ s/\\$/\\\\/; |