4 # a SDL_mixer data module
6 # Copyright (C) 2000,2002 David J. Goehrig
14 my $class = ref($proto) || $proto;
16 my $self = \SDL::MixLoadWAV($filename);
23 SDL::MixFreeChunk($$self);
29 return SDL::MixVolumeChunk($$self,$volume);
42 SDL::Sound - a perl extension
46 L<SDL::Sound> is a module for loading WAV files for sound effects.
47 The file can be loaded by creating a new L<SDL::Sound> object by
48 passing the filename to the constructor;
50 my $sound = new SDL::Sound 'my_sfx.wav';
54 =head2 volume ( value )
56 Sets the volume of the sample.