use SDL;
use SDL::Mixer;
use SDL::Mixer::Music;
use SDL::RWOps;
 
 
my $rwops = SDL::RWOps->new_const_mem( $scalar_holding_music );
my $music = SDL::Mixer::Music::load_MUS_RW( $rwops );