OpenSimulator release-build1.5.pl

#!/usr/bin/perl -w

#use Getopt::Long;

#my %opts = {};

if (@ARGV < 1)
{
    print "Usage: $0 <release-name>\n";
    print "For example, $0 opensim-0.7.3-rc2\n";
    die;
}

my $compressedFileExtension = "zip";
my $releaseName = $ARGV[0];
my $releaseSourceName = "$releaseName-source";
my $releaseSourceTarName = "$releaseSourceName.$compressedFileExtension";
my $releaseTarName = "$releaseName.$compressedFileExtension";

print "Using release name $releaseName\n";

chdir($releaseSourceName);

execCmd("nant distbin");
execCmd("mv distbin ../$releaseName");
chdir("..");
execCmd("zip -r $releaseTarName $releaseName");
execCmd("rm -r $releaseName");
execCmd("unzip $releaseTarName");

sub execCmd
{
    my $cmd = $_[0];
    print "Excecuting command $cmd\n";
    system ($cmd) && die;
}