version 1.60, 2002/01/15 03:34:31
|
version 1.61, 2002/01/15 12:13:55
|
Line 1009 sub PrintField {
|
Line 1009 sub PrintField {
|
$value =~ s/^\s+/<br> /mg; |
$value =~ s/^\s+/<br> /mg; |
$value =~ s/^\|([^\n]*)/<pre>$1<\/pre>/mg; |
$value =~ s/^\|([^\n]*)/<pre>$1<\/pre>/mg; |
$value =~ s/\s+-+\s+/ – /mg; |
$value =~ s/\s+-+\s+/ – /mg; |
$value =~ s/(\s)"/$1“/mg; |
# $value =~ s/(\s)"/$1“/mg; |
$value =~ s/^"/“/mg; |
# $value =~ s/^"/“/mg; |
$value =~ s/"/”/mg; |
# $value =~ s/"/”/mg; |
} |
} |
|
|
|
|