# | Line 11 | Line 11 | require Exporter; | |
---|---|---|
11 | sub setarch { | |
12 | $uname=`uname -a`; | |
13 | ($OSname, $hostname, $OSversion, @rest) = split / /, $uname; | |
14 | + | # |
15 | + | # SunOS - |
16 | + | # |
17 | + | if ( $OSname=~SunOS ) { |
18 | + | $OSversion=~s/^(.\..)\.*/\1/; #Retain only the first two version digits |
19 | + | } |
20 | # simply set to OS type and version | |
21 | $ENV{SCRAM_ARCH}="${OSname}__${OSversion}"; | |
22 | print "Setting Architecture to $ENV{SCRAM_ARCH}\n"; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |