#!/usr/bin/perl

use File::Basename;

$grhome =$ENV{GR_HOME};
$grhome ="/usr/X11R6/lib/X11/xmgr" if "$grhome" eq "";
$dynamic = "$grhome" . "/bin/xmgr.dynamic";
$semistatic = "$grhome" . "/bin/xmgr.semistatic";
$basename = basename($0);
if (-x "$dynamic") {
    exec $dynamic $basename, @ARGV;
} elsif (-x "$semistatic") {
    exec $semistatic $basename, @ARGV;
} else {
    die "ERROR: Can't find any xmgr executable in $grhome/bin\n";
}
