#!/usr/bin/perl
exit unless $ARGV[1]=~ /^(DE|POST\-)INSTALL$/;
$action=(($1 eq 'DE')?'remove':'add').'_parser';
eval "use XML::SAX;"; exit(-1) if $@;
XML::SAX->$action('XML::LibXML::SAX'.$_)->save_parsers() for('::Parser', '');