BEGIN {
  unless ($ENV{BEGIN_BLOCK}) {
    $ENV{DBI_DSN} = "path";
    $ENV{BEGIN_BLOCK} = 1;
    exec 'env',$0,@ARGV;
  }
}