use Audio::LADSPA::Network;
           use Audio::LADSPA::Plugin::Play;

           my $net = Audio::LADSPA::Network->new();
           my $sine = $net->add_plugin( label => 'sine_fcac' );
           my $delay = $net->add_plugin( label => 'delay_5s' );
           my $play = $net->add_plugin('Audio::LADSPA::Plugin::Play');

           $net->connect($sine,'Output',$delay,'Input');
           $net->connect($delay,'Output',$play,'Input');

           $sine->set('Frequency (Hz)' => 440); # set freq
           $sine->set(Amplitude => 1);   # set amp

           $delay->set('Delay (Seconds)' => 1); # 1 sec delay
           $delay->set('Dry/Wet Balance' => 0.2); # balance - 0.2

           for ( 0 .. 100 ) {
               $net->run(100);
           }
           $sine->set(Amplitude => 0); #just delay from now
           for ( 0 .. 500 ) {
               $net->run(100);
           }