$self->{PDF_VERSION} = 0;
   for my $version (reverse 1 .. 4)
   {
      eval "UNIVERSAL::VERSION('pdflib_pl', $version.0)";
      unless ($@)
      {
         $self->{PDF_VERSION} = $version;
         last;
      }
   }
   die "Cannot find pdflib_pl version",$/ unless $self->{PDF_VERSION};