#!/usr/bin/perl

if ($ENV{HTTP_HOST} =~ /(\d+).munciemls.com/) {
print "Location: http://www.munciemls.com/quickmls.idx?referrer=$1\n\n";
exit 0;
}

if ($ENV{HTTP_HOST} =~ /openhouses/i) {
print "Location: http://www.munciemls.com/openhouses.idx\n\n";
exit 0;
}

require "config.idx";



if ($loggedin eq "yes") {
print "Location: http://www.MuncieMLS.com/myhomes.idx\n\n";
exit 0;
}
else {
print "Location: http://www.MuncieMLS.com/register.idx\n\n";
exit 0;
}