version 1.5, 2005/05/31 17:41:38
|
version 1.6, 2005/07/13 21:43:02
|
Line 218 sub htmlclean {
|
Line 218 sub htmlclean {
|
} |
} |
# Generate empty tags, remove wrong end tags |
# Generate empty tags, remove wrong end tags |
unless ($blockemptytags) { |
unless ($blockemptytags) { |
$raw=~s/\<(br|hr|img|meta|allow|basefont)([^\>\/]*?)\>/\<$1$2 \/\>/gis; |
$raw=~s/\<(br|hr|img|meta|embed|allow|basefont)([^\>]*?)\>/\<$1$2 \/\>/gis; |
$raw=~s/\<\/(br|hr|img|meta|allow|basefont)\>//gis; |
$raw=~s/\<\/(br|hr|img|meta|embed|allow|basefont)\>//gis; |
|
$raw=~s/\/ \/\>/\/\>/gs; |
unless ($full) { |
unless ($full) { |
$raw=~s/\<[\/]*(body|head|html)\>//gis; |
$raw=~s/\<[\/]*(body|head|html)\>//gis; |
} |
} |