#!/usr/bin/env perl
use strict;
use warnings;

# A hack to make test spin-up work.

use Cwd qw/ realpath /;
use FindBin;


my $bin = `which mogdbsetup`;
chomp $bin;

die "no mogdbsetup" unless $bin;
die "wrong mogdbsetup" if realpath($bin) eq realpath($FindBin::Bin);

exec($bin, @ARGV);
die $!;