dataverse - glassfish check

gistfile1.sh

# 5a. CHECK IF GLASSFISH DIR LOOKS OK:

unless ( -d $glassfish_dir."/glassfish/domains/domain1" )
{
    # TODO: need better check than this

    while ( ! ( -d $glassfish_dir."/glassfish/domains/domain1" ) )
    {
  print "\nInvalid Glassfish directory " . $glassfish_dir . "!\n";
  print "Enter the root directory of your Glassfish installation:\n";
  print "(Or ctrl-C to exit the installer): ";

  $glassfish_dir = <>;
  chop $glassfish_dir;
    }
}