Select Code to Download

    collect '//server/corion/images/';
    output '/home/corion/imagestream/output';
...
    prefer '.svg' => '.jpg';
    prefer '.svg' => '.png';
    prefer '.cr2' => '.jpg';

    sub collect($) {
        push @image_directories, @_;
...
        push @prefer_format, [@_];
    };
    ...

    my $spec = {
      collect => {
...
      },
    # ...
    };

    my %handler;
    for my $item (values %$spec) {
...
        warn $err;
        return
    };

use Scope::Guard qw(guard);
{ 
...
    # ...
}
# Scope::Guard executes our guard blocks here

    local @{My::App}{keys %handler} = values %handler;
    # Can't modify glob elem in local at ...

    for my $n (keys %handler) {
        local *$n = $handler{ $n };
    }
    # no handlers defined here anymore

    my ($ok,$err);
    my $cfg_str = join ";\n", 
...
        warn $err;
        return
    };

    ...
    {
...
        $err = $@;
    }
    ...