Select Code to Download

 $AUTOLOAD  =~ /.*::(get|bundle)(_next)*(_\w+)_files*$/

while ($s->get_next_blah_file) {
  $s->delete($s->selected_file);
}

my $bundle = $s->bundle_blah_files;
$bundle->delete;