From 79f8740526ceb79be100b6162886069a5fdad30f Mon Sep 17 00:00:00 2001 From: anschuetz Date: Fri, 15 Mar 2013 21:19:46 +0100 Subject: [PATCH] added -no_match_vars to "use English" MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Hi Rüdiger, ich habe gerade in einem Vortrag ("The Essential Perl Hacker's Toolkit") gesehen, dass das Weglassen dieser Option sämtliche RegExp Geschichten verlangsamt... --- printer/run-vm-printer-splitter | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/printer/run-vm-printer-splitter b/printer/run-vm-printer-splitter index 3c7ec55..f2b34b9 100755 --- a/printer/run-vm-printer-splitter +++ b/printer/run-vm-printer-splitter @@ -11,7 +11,7 @@ use File::Basename; use File::Copy; use File::Path; # use log names of perl variables, i.e. $UID -use English; +use English qw( -no_match_vars ); use Log::Log4perl qw(:easy); my $config_file = "/etc/leoclient/leoclient-vm-printer.conf";