Can't call method "findnodes" on unblessed reference; not using OO Perl

[Kenneth Wolcott]

Hi;

  A colleague claims that he made no changes, code worked yesterday and
doesn't today.

  He is not using OO Perl.

  I have asked him for a small code snippet that reproduces the error (I'm
sure he is unwilling to show the entire code!).

  We have rules requiring the standard use of "use strict" and "use
warnings" in all our Perl scripts.

  We use Perl on Windows, Linux and Solaris (all his scripts are supposed to
run without modification on Linux and Windows).

  He claims this: "use strict; use warnings; use XML::XPath;"

Trying to get value for:
$ha = $xPath->findnodes('//job');

Error:
Can't call method "findnodes" on unblessed reference at <file_name> line
<line_number>.

Output from Data::Dumper follows:

$VAR1 = {
          'object' => [
                      {
                        'objectId' => 'job-21461',
                        'job' => {
                                 'priority' => 'normal',
                                 'status' => 'completed',
                                 'outcome' => 'success',
                                 'jobName' => 'DeleteBuilds-200911060000',
                                 'jobId' =>
'21461',
                                 'lastModifiedBy' => 'admin',
                                 }
                      },

                      {

                        'objectId' => 'job-21473',
                        'job' => {
                                 'priority' => 'normal',
                                 'status' => 'completed',
                                 'outcome' => 'success',
                                 'jobName' => 'DeleteBuilds-200911070000',
                                 'jobId' => '21473',
                                 'lastModifiedBy' => 'admin',
                               }
                      },
                      ]
         }