The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.
targets # matches version number to filenemae
		# redirection for backing.wav to 
		# show up as version 1 (usually backing_1.wav) 
vol     # my volume effect, EFFECT_ID
pan 	# my pan effect EFFECT_ID
ops 	# a list of my effects EFFECT_IDs
active 	# selected WAV file version
file	# filename root, i.e. vocal in vocal_5.wav
		# the 'name' of the track
versions# integers representing a wav file 1 -> sax_1.wav
ch_r    # channel for recording to
ch_m    # channel for playing back
offset  # no idea!
rw 		# whether status is REC MON OR MUTE

I would want to break that down to smaller objects

Wav objects

sax 6 -> sax_6.wav

$state_c{$n}->{offset}

package Wav

my $wav = Wav->new( head => vocal);

$wav->versions; $wav->head # vocal $wav->i # 3 i.e. track 3

returns numbers

$wav->targets

returns targets

$wav->full_path

new branch called object

first test out that code for set!

sub set { my $self = shift; my %new_vals = @_; my %filter; map{$filter{$_}++} keys %{ $self }; map{ $self->{$_} = $new_vals{$_} if $filter{$_} } keys %new_vals; }

I also need, well, want to fix the @sorted_ladspa problem. That is related to yaml round tripping. could it be the size of the array? Impossible. So look at the code.

2 POD Errors

The following errors were encountered while parsing the POD:

Around line 122:

Unknown directive: =comment

Around line 213:

Unknown directive: =comment