BEGIN {
    my $need= '/usr/local/sybase/lib';
    my $ld= $ENV{LD_LIBRARY_PATH};
    if(  ! $ld  ) {
        $ENV{LD_LIBRARY_PATH}= $need;
    } elsif(  $ld !~ m#(^|:)\Q$need\E(:|$)#  ) {
        $ENV{LD_LIBRARY_PATH} .= ':' . $need;
    } else {
        $need= "";
    }
    if(  $need  ) {
        exec 'env', $^X, $0, @ARGV;
    }
}


##</code><code>##

BEGIN {
    my $needlib= '/usr/local/sybase/lib';
    my $needsyb= '/usr/local/sybase';
    my $sybpath= $ENV{SYBASE};
    my $ld= $ENV{LD_LIBRARY_PATH};
    if(  ! $ld  ) {
        $ENV{LD_LIBRARY_PATH}= $needlib;
    } elsif(  $ld !~ m#(^|:)\Q$needlib\E(:|$)#  ) {
        $ENV{LD_LIBRARY_PATH} .= ':' . $needlib;
    } else {
        $needlib= "";
    }
    if(  $needlib  ) {
        exec 'env', $^X, $0, @ARGV;
    }

   if(  ! $sybpath  ) {
        $ENV{SYBASE}= $needsyb;
    } elsif(  $ld !~ m#(^|:)\Q$needsyb\E(:|$)#  ) {
        $ENV{SYBASE} .= ':' . $needsyb;
    } else {
        $needsyb= "";
    }
    if(  $needsyb  ) {
        exec 'env', $^X, $0, @ARGV;
    }

}