From df7aeaab44c1f2ae838f21dba2f78a13fbd5458d Mon Sep 17 00:00:00 2001
From: Elijah Perrault <elijah@starcoder.info>
Date: Sat, 22 Jan 2011 09:49:20 -0700
Subject: [PATCH] Use system()

---
 install | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/install b/install
index fedb224..4ccef23 100755
--- a/install
+++ b/install
@@ -98,19 +98,19 @@ modfind("Class::Unload");
 println "\0";
 println "Building.....";
 unless (-d "$Bin/build") {
-	`mkdir $Bin/build`;
+	system("mkdir $Bin/build");
 }
 unless (-e "$Bin/build/time") {
-	`touch $Bin/build/time`;
+	system("touch $Bin/build/time");
 }
 unless (-e "$Bin/build/os") {
-	`touch $Bin/build/os`;
+	system("touch $Bin/build/os");
 }
 unless (-e "$Bin/build/perl") {
-	`touch $Bin/build/perl`;
+	system("touch $Bin/build/perl");
 }
 unless (-e "$Bin/build/ver") {
-	`touch $Bin/build/ver`;
+	system("touch $Bin/build/ver");
 }
 
 open FTIME, ">$Bin/build/time" or println "Failed to install." and exit;