+# +------------------------------------+
+# | Inspire Internet Relay Chat Daemon |
+# +------------------------------------+
#
-# Copyright 2002-2007 The ChatSpike Development Team
-# <brain@chatspike.net>
-# <Craig@chatspike.net>
+# InspIRCd: (C) 2002-2007 InspIRCd Development Team
+# See: http://www.inspircd.org/wiki/index.php/Credits
#
-# Licensed under GPL, please see the COPYING file
-# for more information
+# This program is free but copyrighted software; see
+# the file COPYING for details.
#
+# ---------------------------------------------------
package make::utilities;
+
+require 5.8.0;
+
use Exporter 'import';
use POSIX;
use Getopt::Long;
chomp($replace);
$line =~ s/exec\("(.+?)"\)/$replace/;
}
+ while ($line =~ /execruntime\("(.+?)"\)/)
+ {
+ $line =~ s/execruntime\("(.+?)"\)/`\1`/;
+ }
while ($line =~ /eval\("(.+?)"\)/)
{
print "Evaluating perl code for module \033[1;32m$module\033[0m ... ";