$gpath = $ENV{GLOBUS_LOCATION};
if (!defined($gpath))
{
- exitDie "GLOBUS_LOCATION needs to be set before running this script"
+ exitDie("ERROR: GLOBUS_LOCATION needs to be set before running this script!\n");
}
#
my($filename) = @_;
my($data);
- open(IN, "$filename") || exitDie "Can't open '$filename': $!";
+ open(IN, "$filename") || exitDie("ERROR: Can't open '$filename': $!\n");
$/ = undef;
$data = <IN>;
$/ = "\n";
if ( !defined($filename) || (length($filename) lt 1) )
{
- exitDie "Filename is undefined";
+ exitDie("ERROR: Filename is undefined!\n");
}
#
if (($result or $?) and $command !~ m!patch!)
{
- exitDie "ERROR: Unable to execute command: $!\n";
+ exitDie("ERROR: Unable to execute command: $!\n");
}
}