Adding support for Windows to the Perl cookbook.

adding some handlers for installing Strawberry Perl on Windows

escaping backslashes is important

missing 'do' keywords

changing :create_if_missing to :create; apparently that's been deprecated...

adding owner, group, and mode. They're in Unix-talk, but hopefully it'll get chef to stop complaining

removing a single. damn. period.

confirmed that perl gets installed in Windows, but ignored the install location parameter.

adding the proper flag to install to the specified directory, and prepending the new dir to the PATH

adding PATH statement to the install block

closing quotes

fixing the path again.  Use the right directory delimiter.

using setx instead of set. May be problems due to required/escaped quotes

backslashes for Windows paths...

Moving the path modifier to a separate action, and trying the windows_path primitive

fixing paths and going back to my prepend method

I was missing a 'do'

updating metadata and readme after completing install of Strawberry Perl on Windows.

Author: gwaldo

README.md

@@ -12,6 +12,7 @@ Requirements
 * Debian/Ubuntu/Mint
 * RHEL/CentOS/Scientific/Oracle/Fedora
 * ArchLinux
+* Windows
 
 Attributes
 ==========

attributes/default.rb

@@ -30,10 +30,25 @@
   default['perl']['packages'] = %w{ perl libperl-dev }
 when "arch"
   default['perl']['packages'] = %w{ perl perl-libwww }
+when "windows"
+  default['perl']['maj_version'] = '5'
+  default['perl']['min_version'] = '16'
+  default['perl']['sub_version'] = '1.1'
+  case node['kernel']['machine'].to_s
+  when "x86_64"
+	default['perl']['bitness'] = '64bit'
+  else
+    default['perl']['bitness'] = '32bit'
+  end
 else
   default['perl']['packages'] = %w{ perl libperl-dev }
 end
 
 default['perl']['cpanm']['url'] = 'https://raw.github.com/miyagawa/cpanminus/1.5015/cpanm'
 default['perl']['cpanm']['checksum'] = '8cb7b62b55a3043c4ccb'
 default['perl']['cpanm']['path'] = '/usr/local/bin/cpanm'
+
+default['perl']['install_dir'] = 'C:\\perl\\'
+
+
+

metadata.rb

@@ -3,7 +3,7 @@
 license           "Apache 2.0"
 description       "Installs perl and provides a define for maintaining CPAN modules"
 long_description  IO.read(File.join(File.dirname(__FILE__), 'README.md'))
-version           "1.0.2"
+version           "1.0.3"
 
 recipe "perl", "Installs perl and adds a provider to install cpan modules"
 

recipes/default.rb

@@ -17,16 +17,58 @@
 # limitations under the License.
 #
 
-node['perl']['packages'].each do |perl_pkg|
-  package perl_pkg
-end
+unless node['platform'] == 'windows'
+	node['perl']['packages'].each do |perl_pkg|
+	  package perl_pkg
+	end
 
-cpanm = node['perl']['cpanm'].to_hash
-root_group = (node[:platform] == "mac_os_x") ? "admin" : "root"
-remote_file cpanm['path'] do
-  source cpanm['url']
-  checksum cpanm['checksum']
-  owner "root"
-  group root_group
-  mode 0755
+	cpanm = node['perl']['cpanm'].to_hash
+	root_group = (node[:platform] == "mac_os_x") ? "admin" : "root"
+	remote_file cpanm['path'] do
+	  source cpanm['url']
+	  checksum cpanm['checksum']
+	  owner "root"
+	  group root_group
+	  mode 0755
+	end
+else
+	installer = "strawberry-perl-#{node['perl']['maj_version']}.#{node['perl']['min_version']}.#{node['perl']['sub_version']}-#{node['perl']['bitness']}.msi"
+		
+	directory 'C:\\temp\\' do
+		action :create
+		owner "administrator"
+		group "administrators"
+		mode 0774
+	end
+	
+	directory node['perl']['install_dir'] do
+		action :create
+		owner "administrator"
+		group "administrators"
+		mode 0774
+	end
+	
+	remote_file "C:\\temp\\#{installer}" do
+		source "https://strawberry-perl.googlecode.com/files/#{installer}"
+		action :create
+		owner "administrator"
+		group "administrators"
+		mode 0774
+	end
+	
+	execute "Install StrawberryPerl" do
+		command "msiexec /qn /i C:\\temp\\#{installer} INSTALLDIR=#{node['perl']['install_dir']} PERL_PATH=YES"
+		not_if { File.exists?("#{node['perl']['install_dir']}\\perl\\bin\\perl.exe") }
+	end
+	
+	execute "Add Perl to PATH" do
+		command "setx /M path \"#{node['perl']['install_dir']}perl\\bin;%path%\""
+	end
+	
+	## Going to try the windows_path primitive
+	## This appears to only Append to %PATH%, when I want it to Prepend
+	#windows_path "#{node['perl']['install_dir']}perl\\bin" do
+	#	action :add
+	#end	
+	
 end