| Subject: | support for XSLoader |
Please add support for XSLoader. XSLoader is noticeably faster than DynaLoader.
With DynaLoader:
perl -MHTML::Parser -e1 0,18s user 0,01s system 92% cpu 0,205 total
perl -MHTML::Parser -e1 0,19s user 0,01s system 96% cpu 0,207 total
perl -MHTML::Parser -e1 0,19s user 0,01s system 96% cpu 0,206 total
With XSLoader:
perl -MHTML::Parser -e1 0,15s user 0,00s system 92% cpu 0,163 total
perl -MHTML::Parser -e1 0,15s user 0,00s system 92% cpu 0,161 total
perl -MHTML::Parser -e1 0,12s user 0,03s system 91% cpu 0,163 total
--- HTML-Parser-3.45/Parser.pm- 2005-01-06 12:02:27 +0300
+++ HTML-Parser-3.45/Parser.pm 2005-06-25 12:34:52 +0400
@@ -13,9 +13,15 @@
require HTML::Entities;
-require DynaLoader;
-@ISA=qw(DynaLoader);
-HTML::Parser->bootstrap($VERSION);
+eval {
+ require XSLoader;
+ XSLoader::load('HTML::Parser', $VERSION);
+ 1;
+} or do {
+ require DynaLoader;
+ local @ISA=qw(DynaLoader);
+ HTML::Parser->bootstrap($VERSION);
+};
sub new
End of patch
--
Alexey Tourbin
ALT Linux Team