version 1.7, 2014/06/29 23:50:25
|
version 1.8, 2015/01/03 03:00:18
|
Line 34 if (open(PIPE,"locale |")) {
|
Line 34 if (open(PIPE,"locale |")) {
|
|
|
my $osmsg = "\n**** WARNING: You seem to have a non-English operating system.\n"; |
my $osmsg = "\n**** WARNING: You seem to have a non-English operating system.\n"; |
|
|
if ('<DIST />' eq 'sles9' || '<DIST />' eq 'sles10' || '<DIST />' eq 'sles11' || |
if ('<DIST />' eq 'sles9' || '<DIST />' eq 'sles10' || '<DIST />' eq 'sles11' || '<DIST />' eq 'sles12' || |
'<DIST />' eq 'suse11.1' || '<DIST />' eq 'suse11.2' || '<DIST />' eq 'suse11.3' || |
'<DIST />' eq 'suse11.1' || '<DIST />' eq 'suse11.2' || '<DIST />' eq 'suse11.3' || |
'<DIST />' eq 'suse11.4' || '<DIST />' eq 'suse12.1' || '<DIST />' eq 'suse12.2' || |
'<DIST />' eq 'suse11.4' || '<DIST />' eq 'suse12.1' || '<DIST />' eq 'suse12.2' || |
'<DIST />' eq 'suse12.3' || '<DIST />' eq 'suse13.1') { |
'<DIST />' eq 'suse12.3' || '<DIST />' eq 'suse13.1' || '<DIST />' eq 'suse13.2') { |
if (open(PIPE,"cat /etc/sysconfig/language |grep '^RC_LANG' |")) { |
if (open(PIPE,"cat /etc/sysconfig/language |grep '^RC_LANG' |")) { |
print "Checking OS language"; |
print "Checking OS language"; |
if (<PIPE> =~ /^RC_LANG="en/) { |
if (<PIPE> =~ /^RC_LANG="en/) { |