modperl not recognizing array reference

[Michael Greenish]

Hello,

This should be very easy but apache is not letting me
do this.  I have a list of file names stored in an
array.  The list is created as follows:

  push @resizeList, $img->{path} . $img->{file};


The list is passed to a package via a new method as
follows:

  my $imageResize = Ishare::Classes::ImageClass->new(
{
     resize_list => [EMAIL PROTECTED]
  } );


The new method is as follows:

sub new {
    my $this = shift;
    my $class = ref($this) || $this;
    my $objRef = shift;

    bless $objRef, $class;
    return $objRef;
}


Now, when I want to iterate over my list:

sub resizeImgs {
    my $self = shift;
    foreach my $file( @$self->{resize_list} ) {
...

I get the following error:

Not an ARRAY reference at
/http/greanie/perl-lib/Ishare/Classes/ImageClass.pm
line 193.


However, when I print out the reference type of
$self->{resize_list}, I get 'ARRAY'.  When I print out
$self->{resize_list} using Data::Dumper::Simple, I
get:

@_ = (
       [
        
'/ishare/greanie/images/34_Alyssa_Mike_and_Buddy_Sitting_On_Rocks_1.JPG',
        
'/ishare/greanie/images/35_Buddy_in_the_Sky.JPG',
        
'/ishare/greanie/images/36_Buddy_On_Leash_On_Cliffs.JPG',
        
'/ishare/greanie/images/37_Buddy_Sleeping_in_Grass.JPG',
        
'/ishare/greanie/images/38_Glorious_Buddy.JPG',
        
'/ishare/greanie/images/39_Group_Picture_on_Cliffs_1.JPG',
        
'/ishare/greanie/images/40_Group_Picture_Start_of_Trip.JPG',
        
'/ishare/greanie/images/41_Linda_Mike_Shiraz_On_Da_Trail.JPG',
         '/ishare/greanie/images/42_Linda_Smiles.JPG',
        
'/ishare/greanie/images/43_Ned_and_Carrie.JPG',
        
'/ishare/greanie/images/44_View_From_Trail.JPG'
       ]
     );

which looks like an array reference.  So what is the
problem???!!!

Help greatly appreciated!

Thanks,

greanie




__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com