my $detail = "";
    $detail = join("", $detail, "/usr/bin/perl LGE.pl " );
    $detail = join("", $detail, "--target $target ") if defined $target;
    $detail = join("", $detail, "--port $portnum ") if defined $portnum;
    $detail = join("", $detail, "--interval $interval ") if defined $interval;
    $detail = join("", $detail, "--protocol $protocol ") if defined $protocol;
    $detail = join("", $detail, "--source $prmlist ") if defined $prmlist;
    $detail = join("", $detail, "--start");

    $ENV{'PATH'} = '/bin:/usr/bin';
    delete @ENV{'IFS', 'CDPATH', 'ENV', 'BASH_ENV'};

    untaint($detail);

    my $command = qx($detail);