BEGIN {
    unless ($ARGV[0] eq "-2ndcall") {
        print "\n ... starting BEGIN\n";

        $ENV{LD_LIBRARYN32_PATH} = qw(
            /usr/path1 
            /opt/path2);

        unshift @ARGV, "-2ndcall";
        exec 'env', $^X, $0, @ARGV;
    }
}