| Subject: | Need to skip over unknown blocks |
In Audio::Wav 0.04, it does not advance pointer to end of each unknown
block, resulting in corrupt reading of file. Works to simply advance
the pointer past that block.
Robert Hiller
West St. Paul, Minnesota
perl@roberthiller.com
} else {
$head =~ s/[^\w]+//g;
$self -> _error( "ignored unknown block type: $head at $self->{pos} for $chunk_len", 'warn' );
# next if $chunk_len > 100; #RAH 17-Aug-2005
_read_raw($chunk_len); #RAH 17-Aug-2005 Skip over
}