version 1.17, 2010/05/08 18:20:56
|
version 1.18, 2011/05/05 15:48:25
|
Line 55 if (-e '/etc/redhat-release') {
|
Line 55 if (-e '/etc/redhat-release') {
|
$dist = 'rhes'.$1; |
$dist = 'rhes'.$1; |
} elsif ($versionstring =~ /CentOS release (\d+)/) { |
} elsif ($versionstring =~ /CentOS release (\d+)/) { |
$dist = 'centos'.$1; |
$dist = 'centos'.$1; |
} elsif ($versionstring =~ /Scientific Linux SL release ([\d.]+) /) { |
} elsif ($versionstring =~ /Scientific Linux (SL )?release ([\d.]+) /) { |
my $ver = $1; |
my $ver = $1; |
$ver =~ s/\.\d+$//; |
$ver =~ s/\.\d+$//; |
$dist = 'scientific'.$ver; |
$dist = 'scientific'.$ver; |