Hi Dirk,
We have looked into this problem and added a ticket for it on our bug tracker.
Ticket 74 . So far your code seems to work on winXP. We don't have a developer with Vista however. Dirk80, to get a better error report please change your code to the following. In the next release we will be updating Mixer bindings so this may be fixed soon. Please give us feed back on sdl-devel@perl.org or #sdl irc.perl.org.
use strict;
use warnings;
use SDL v2.2.6; # This is for the old API
use SDL::Mixer;
use SDL::Music;
SDL::Init(SDL_INIT_AUDIO);
my $mixer = eval { SDL::Mixer->new(-frequency => 44100, -channels => 2
+, -size => 1024); };
$mixer->music_volume(20);
my $music = new SDL::Music './test.mp3' or die "$! and SDL Error is".S
+DL::GetError();
$mixer->play_music($music,0); #0 for single play
while(1)
{
if( $mixer->playing_music() )
{
sleep(1);
}
else
{
last;
}
}
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.