Add perl module VMware-vSphere-Perl-SDK

3 files changed, 74 insertions, 0 deletions

diff --git a/perl-gcpan/VMware-vSphere-Perl-SDK/Manifest b/perl-gcpan/VMware-vSphere-Perl-SDK/Manifest
new file mode 100644
index 00000000..3ef444c7
--- /dev/null
+++ b/perl-gcpan/VMware-vSphere-Perl-SDK/Manifest
@@ -0,0 +1,3 @@
+AUX uuid-module.patch 2163 SHA256 c68641c727318808a6faa18f15093f75dceef79b6a4222f12df5dbf8b0d1c685 SHA512 bb04abb9345a6fe8d5c557b29c6d7f54c630eade3ae112312d9a3b9288bacf5044e3e39817c42b240b0ecf7b9b1d55726d712c348c0257979956b43ecb8a52ac WHIRLPOOL 5daf9907739023ee9c131029ff6a6427471c9b583ab8338a4412c02b9a61c872899a2615e695f4d71e7a61e6c4ce3a962c8d3decfaffe807e7fd964c0aebe273
+DIST VMware-vSphere-Perl-SDK-5.1.0-780721.i386.tar.gz 25188254 SHA256 2d14c9f00b4e982a0c66ca3e95eb20411d17f71c6f50af071f30355222f2ea85 SHA512 b5e7c749ab01e817483eaebc6efe8a9205b31db6690a336e9845d99b7607e77d73f2b3793adb99f1c13b03484dea69b6738e44489235a9a106ce51d83163787d WHIRLPOOL 971b9786983fb907838c4b276b587c25c1e137c7fb5160fc8928c5ac0d6ef46966b3e7686acf8a4baaf77458ff3b8994dc6ad551733759b550f7427f9f60733b
+EBUILD VMware-vSphere-Perl-SDK-5.1.0.780721.ebuild 439 SHA256 cd811796bd1292784a06b054f773ed6c705e9ee1678548c8783ad0085f464c27 SHA512 f69d9247d37431c5c9a124118d260dc7e47ff1fbbc5bb3835470ea0add67126923ae0fc54f0fcd0365c5fd0971cabf36f21e93b37b36aa71c17daa2e8beccaf5 WHIRLPOOL 70e69f3f19b0b7a404a12b2e37a47a4c4d3ac4317a1c787ce04fe5e154658aad96c86f9c10f00f5b0734245e9ebbb238301fa18b7b4411c19fb33abb0c47ea23
diff --git a/perl-gcpan/VMware-vSphere-Perl-SDK/VMware-vSphere-Perl-SDK-5.1.0.780721.ebuild b/perl-gcpan/VMware-vSphere-Perl-SDK/VMware-vSphere-Perl-SDK-5.1.0.780721.ebuild
new file mode 100644
index 00000000..747b9725
--- /dev/null
+++ b/perl-gcpan/VMware-vSphere-Perl-SDK/VMware-vSphere-Perl-SDK-5.1.0.780721.ebuild
@@ -0,0 +1,24 @@
+EAPI=4
+
+MODULE_AUTHOR=VMWare
+MODULE_VERSION=5.1.0-780721.i386
+inherit perl-module
+
+DESCRIPTION="A Perl SDK for interacting with VMware vSphere infrastructure"
+
+SLOT="0"
+KEYWORDS="amd64 x86"
+
+RESTRICT="fetch"
+
+S="${WORKDIR}/vmware-vsphere-cli-distrib"
+
+PATCHES=(
+  ${FILESDIR}/uuid-module.patch
+)
+
+myinst="
+  DEST_VMWARE_APPS=${D}/usr/$(get_libdir)/vmware-viperl/apps
+  DEST_VMWARE_DOC=${D}/usr/share/doc/vmware-viperl/doc
+  DESTDIR=${D}
+"
diff --git a/perl-gcpan/VMware-vSphere-Perl-SDK/files/uuid-module.patch b/perl-gcpan/VMware-vSphere-Perl-SDK/files/uuid-module.patch
new file mode 100644
index 00000000..5aecf9ac
--- /dev/null
+++ b/perl-gcpan/VMware-vSphere-Perl-SDK/files/uuid-module.patch
@@ -0,0 +1,47 @@
+# $Id$
+--- bin/vmware-uninstall-vSphere-CLI.pl	2011-06-02 01:52:30.000000000 +1000
++++ bin/vmware-uninstall-vSphere-CLI.pl	2011-08-29 13:15:19.558032827 +1000
+@@ -5423,7 +5423,7 @@
+     {'module' => 'Data::Dumper',                  'version' => '2.121',    'path' => 'Data-Dumper-2.121'},
+     {'module' => 'Class::MethodMaker',            'version' => '2.10',     'path' => 'Class-MethodMaker-2.10'},
+     {'module' => 'HTML::Parser',                  'version' => '3.60',     'path' => 'HTML-Parser-3.60'},
+-    {'module' => 'UUID',                          'version' => '0.03',     'path' => 'UUID-0.03'},
++    {'module' => 'Data::UUID',                    'version' => '1.217',    'path' => 'Data-UUID-1.217'},
+     {'module' => 'Data::Dump',                    'version' => '1.15',     'path' => 'Data-Dump-1.15'},
+     {'module' => 'SOAP::Lite',                    'version' => '0.710.08', 'path' => 'SOAP-Lite-0.710.08'},
+     {'module' => 'URI',                           'version' => '1.37',     'path' => 'URI-1.37'},
+--- lib/WSMan/share/WSMan/WSBasic.pm	2011-05-17 08:22:08.000000000 +1000
++++ lib/WSMan/share/WSMan/WSBasic.pm	2011-08-29 13:01:52.541492208 +1000
+@@ -3,7 +3,7 @@
+ 
+ #=========================<Imports>==================================#
+ use SOAP::Lite;
+-use UUID;
++use Data::UUID;
+ #use MIME::Base64;
+ #=========================</Imports>=================================#
+ 
+@@ -91,10 +91,8 @@
+ 
+ #Method to generate UUIDs.
+ sub _get_uuid{
+-    my ($uuid, $string);
+-    UUID::generate($uuid);
+-    UUID::unparse($uuid, $string);
+-    return $string;
++    my $ug = new Data::UUID;
++    return $ug->create_str();
+ }
+ 
+ #Identify Method.
+--- Makefile.PL	2011-06-02 01:52:29.000000000 +1000
++++ Makefile.PL	2011-08-29 13:15:33.956363049 +1000
+@@ -74,7 +74,7 @@
+                           'Class::MethodMaker' => '2.08',
+                           'XML::LibXML' => '1.58',
+                           'LWP' => '5.8.05',
+-                          'UUID' => '0.03',
++                          'Data::UUID' => '1.0',
+                           'SOAP::Lite' => '0.67'},
+    #
+    # These macros put things in the usual spot if you are running