Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
executable file 15 lines (13 sloc) 0.424 kB
#!/usr/bin/perl
use strict;
use Cwd;
my $cwd = getcwd;
my ($svn) = $cwd =~ m!^(.+)/mogilefs/server! or
die "not sure where we're at";
$ENV{PERL5LIB} = join(":",
"$svn/mogilefs/server/lib",
"$svn/perlbal/lib",
($ENV{PERL5LIB} ? ($ENV{PERL5LIB}) : ()),
);
print "export PERL5LIB=$ENV{PERL5LIB}\n";
system($^X, "./mogstored", @ARGV);
Jump to Line
Something went wrong with that request. Please try again.