Select Code to Download

local $/;
my %conf = eval <CONF>;

#!/usr/bin/perl

# Which store are we using?
...
sqlite => {
    file => 't/data/store.db',
},

use Regexp::Common;

{
...
        *_conf_re      = sub { $conf_re };
    }
}

local $/;
my %conf = eval _untaint_config(<CONF>);