my $magic = sub {
    my $textref = shift;
    $textref =~ s/!!!blargle!!!/<tmpl_include $policy_file>/g;
};