my $parser;
BEGIN {
	eval {
		"use Parse::HTTP::UserAgent"
	  };
	  $parser = 1 unless $@;
}