From 6e63e938a0858f8dc8b2503a3c23920da2bdbba6 Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Sat, 22 Jun 2013 22:57:36 +0200
Subject: [PATCH] Fix typo in new Build.PL

---
 Build.PL | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Build.PL b/Build.PL
index 51f286ed3..c87d5b51f 100644
--- a/Build.PL
+++ b/Build.PL
@@ -35,7 +35,7 @@ if (defined $ENV{CPANM} && -x $ENV{CPANM}) {
     $cpanm = $ENV{CPANM};
 } elsif (-x (my $c = File::Spec->catfile($Config{installscript}, 'cpanm'))) {
     $cpanm = $c;
-} elsif ($^O = /^(?:darwin|linux)$/ && system(qw(which cpanm)) == 0) {
+} elsif ($^O =~ /^(?:darwin|linux)$/ && system(qw(which cpanm)) == 0) {
     $cpanm = 'cpanm';
 }
 die <<'EOF'