Prima::tutorial Prima::Utils::find_image example not working on XP and ActivePerl

prima:

I am running Windows XP Professional SP2 with all current patches,,
ActivePerl-5.8.8.822-MSWin32-x86-280952.msi, prigraph.dll 306 KB
10/1/2005 1:38 PM, and Prima-1.23-MSWin32-588.zip. I have cut/pasted
the Prima tutorial examples from:

    http://search.cpan.org/~karasik/Prima-1.24/pod/Prima/tutorial.pod

When I try to run the example that makes use of Prima::Utils
find_image(), the File menu contains one item "No image found or can be
loaded" and the console window contains an error message (see console
session, below).

Any suggestions?

TIA,

David

C:\Documents and Settings\dpchrist\My Documents\prima>type hello6.pl
#! /usr/bin/perl -w
use strict;
use Prima qw(Application MsgBox);
use Prima::Utils qw(find_image);
my $f = 'C:\Perl\html\images\activeperl_logo.gif';
warn "cannot read file '$f'" unless -r $f;
my $i = Prima::Image->load( find_image($f) );
$i ||= 'No image found or can be loaded';
my $window = Prima::MainWindow-> new(
    text => 'Hello world!',
    menuItems => [
        [ '~File' => [
            [ $i, sub {} ],
        ]],
    ],
);
run Prima;

C:\Documents and Settings\dpchrist\My Documents\prima>perl hello6.pl
Use of uninitialized value in subroutine entry at hello6.pl line 7.
Received on Thu 10 Apr 2008 - 06:09:08 CEST