use variable in Tk::Photo?

[AMiSM]

Hi, folks! Sean here!
I'm trying to assign some defined images to an array. It keeps telling me I can't call method Photo with an undefined value.

my @question;
for my $q (1..20) {
my $img = $mw -> Photo ( -file => "Q$q.bmp" );
push @question, $img;
}

What bonehead thing am I doing wrong?

 

[AMiSM]

Never mind, it's something else entirely

 

[MillerH]

Aye, $mw is undefined.

Probably just an initialization issue. Be sure to error check construction of objects. A lot of cpan modules will set error codes if the object wasn't created. A simple or die works great for detecting that.

- Miller