Cross Reference:
xref
: /
hets
/
utils
/
genRules
Home
History
Annotate
Line#
Navigate
Download
Search
only in
./
genRules revision 78f51585b9ef1095880ddd235a8d41ff9e152fc5
97a9a944b5887e91042b019776c41d5dd74557af
erikabele
#!/
usr
/
bin
/
perl
97a9a944b5887e91042b019776c41d5dd74557af
erikabele
97a9a944b5887e91042b019776c41d5dd74557af
erikabele
use
strict
;
a945f35eff8b6a88009ce73de6d4c862ce58de3c
slive
use
File
::
Basename
;
a945f35eff8b6a88009ce73de6d4c862ce58de3c
slive
a945f35eff8b6a88009ce73de6d4c862ce58de3c
slive
my
$un
=
`
uname
`
;
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
my
$suf
=
'unknown'
;
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
$un
=~ m
"^SunOS"
&&
do
{
$suf
=
"solaris"
};
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
$un
=~ m
"^Linux"
&&
do
{
$suf
=
"linux"
};
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
$un
=~ m
"^Darwin"
&&
do
{
$suf
=
"macintosh"
};
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
if
(
$suf
eq
'unknown'
)
{
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
print
STDERR
"Unknown system\nSupported systems: solaris (SunOS), Linux\n"
;
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
exit
1
;
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
}
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
if
(
$suf
eq
'linux'
)
{
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
my
$tmp
=
$ENV
{
'LD_LIBRARY_PATH'
}
if
exists
$ENV
{
'LD_LIBRARY_PATH'
};
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
if
(
defined
$tmp
)
{
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
$ENV
{
'LD_LIBRARY_PATH'
} =
"
$tmp
:/
usr
/
local
/
lib
"
;
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
}
else
{
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
$ENV
{
'LD_LIBRARY_PATH'
} =
"/
usr
/
local
/
lib
"
;
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
}
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
}
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
exec
(
"$0.
$suf
"
,@
ARGV
)
;
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
print
STDERR
'couldn\'t exec "'
,
"$0.
$suf
"
,
"\"\n"
;
fe64b2ba25510d8c9dba5560a2d537763566cf40
nd
exit
2
;
117c1f888a14e73cdd821dc6c23eb0411144a41c
nd