Select Code to Download

    SOMECLASS->_addbuf($buffer) if $buffer && @$buffer;

sub _addbuf {
    print STDERR "_addbuf(", Dumper(\@_), ")\n";
...
       print STDERR "making a new item...\n";
    }
}