Subject: | [Audio::Wav] Write::write() bug at 16bit-2channel. |
Date: | Wed, 23 Apr 2014 17:47:27 +0900 |
To: | bug-Audio-Wav [...] rt.cpan.org |
From: | Kataoka Haruka <hrk8 [...] drumsoft.com> |
Hi Brian.
Write::write() failed at 16(or grater)bits and 2(or grater)channels.
It seems that many samples are not written correctly.
It caused by following code:
Wav::Write.pm
281: return $self -> write_raw( @samples );
$samples[0](=sample from left channel) and $samples[1](=sample from right channel)
are assigned as 2nd($data) and 3rd($len) arguments of Write::write_raw().
It will be fixed like this:
281: return $self -> write_raw( join '', @samples );
Thanks.
--
Haruka Kataoka
Message body is not shown because sender requested not to inline it.