On Tue, Jun 14, 2011 at 2:41 AM, Adam Fairbrother
<afairbrot...@sd73.bc.ca> wrote:
> Hi,
>
> It's been a week since I asked about this and No one has responded, Did I
> ask incorrectly or in the wrong mailing list?
>
> Any help that could be provided would be appreciated.
>
> Thanks,
>
> #------------------------------------------------------
> Adam Fairbrother
> Help Desk Technician
> afairbrot...@sd73.bc.ca
> School District #73
>
> ----- "Adam Fairbrother" <afairbrot...@sd73.bc.ca> wrote:
>
>> Hi I'm having a bit of trouble getting a SDL::Perl running on a debian
>> Lenny setup.
>>
>> I have SDL::Perl installed from CPAN.
>> Alien::SDL installed from cpan with the option to build all
>> dependencies and library's.
>>
>> When I was testing to get things working, my short test script would
>> throw an error. The script and the error are below.
>>
>> I have libjpeg.so.8 built in the Alien SDL directory, but my guess is
>> that SDL isn't correctly configured to pick up that library folder. I
>> don't want to mess up the system SDL install incase something goes
>> wrong, and I can't install libjpeg.so.8 from packages on Lenny, as
>> there is no package for it.
>>
>> How do I have SDL recognize the library's provided by SDL::Alien, or
>> what am I doing wrong?
>>
>> Thanks,
>>
>>
>> Here is my script:
>>
>> #!/usr/bin/perl
>> use 5.010;
>> use strict;
>> use warnings;
>> use SDLx::App;
>> use SDLx::Sprite;
>>
>> my $app = SDLx::App->new(height=>1024,width=>768);
>>
>> my $sprite = SDLx::Sprite->new(image=>'pic.jpg');
>> $sprite->draw($app);
>>
>> Here is the Error
>>
>> error loading image pic.jpg: Failed loading libjpeg.so.8:
>> libjpeg.so.8: cannot open shared object file: No such file or
>> directory at /usr/local/lib/perl/5.10.0/SDLx/Surface.pm line 188
>> SDLx::Surface::load('SDLx::Surface', 'pic.jpg') called at
>> /usr/local/lib/perl/5.10.0/SDLx/Sprite.pm line 25
>> SDLx::Sprite::new('SDLx::Sprite', 'image', 'pic.jpg') called
>> at ./slideshow.pl line 14
>>
>>
>> #------------------------------------------------------
>> Adam Fairbrother
>> Help Desk Technician
>> afairbrot...@sd73.bc.ca
>> School District #73
>>
>> --
>> To unsubscribe, e-mail: beginners-unsubscr...@perl.org
>> For additional commands, e-mail: beginners-h...@perl.org
>> http://learn.perl.org/
>
> --
> To unsubscribe, e-mail: beginners-unsubscr...@perl.org
> For additional commands, e-mail: beginners-h...@perl.org
> http://learn.perl.org/
>
>
>
It seemed to me that you need to give a path to "pic".
my $sprite = SDLx::Sprite->new(image=>'C:/OMG.jpg'); for example.
Sayth
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
