From 058b3f0803a6ed2829e8cf827bafdfeddedde5f7 Mon Sep 17 00:00:00 2001
From: Oliver Tappe
Date: Tue, 11 Mar 2008 15:21:50 +0000
Subject: * made hostIs64Bit() available as util function

git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@1615 95ad53e4-c205-0410-b2fa-d234c58c8868
---
 lib/OpenSLX/Utils.pm | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'lib/OpenSLX/Utils.pm')

diff --git a/lib/OpenSLX/Utils.pm b/lib/OpenSLX/Utils.pm
index 22e2ebbc..9d8b4599 100644
--- a/lib/OpenSLX/Utils.pm
+++ b/lib/OpenSLX/Utils.pm
@@ -33,6 +33,7 @@ $VERSION = 1.01;
   mergeHash
   getFQDN
   readPassword
+  hostIs64Bit
 );
 
 ################################################################################
@@ -318,4 +319,10 @@ sub readPassword
     return $term->readline($prompt);
 }
 
+sub hostIs64Bit
+{
+	my $arch = qx{uname -m};
+	return $arch =~ m[64];
+}
+
 1;
-- 
cgit v1.2.3-55-g7522