if ($t =~ /^y/) { `cp /etc/httpd/httpd.conf /etc/httpd/httpd.conf.save`; $orig = 'CustomLog "\/private\/var\/log\/httpd\/access_log" common'; $new = 'CustomLog "\/private\/var\/log\/httpd\/access_log" combined'; print "Modifying apache configuration..."; `/usr/bin/sed -e 's/$orig/\#$orig/' -e 's/\#$new/$new/' /etc/httpd/httpd.conf > /etc/httpd/httpd.conf`; print " done. \n\nOriginal saved to /etc/httpd/httpd.conf.save\n\n"; print "Apache needs to be restarted for this to take effect, would you like to do this now? (y/n) "; $a = <>; if ($a =~ /^y/) { print "Restarting apache..."; print " done\n\n"; } }