# from PDF/Parse.pm

sub IsaPDF {
    return ($_[0]->{Header} != undef) ;
}