Select Code to Download

use feature 'say';
unless ($verbose) {
...
        #say 'this goes unsayable';
}
say 'said';

use feature 'say';
undef &say;
...
sub not_say {
    print 'not saying';
}

use feature 'say';
use Sub::Delete;
delete_sub 'say';
say 'testing';