|
From: <son...@us...> - 2008-04-21 20:08:32
|
Revision: 296
http://cbench.svn.sourceforge.net/cbench/?rev=296&view=rev
Author: sonicsoft70
Date: 2008-04-21 13:08:20 -0700 (Mon, 21 Apr 2008)
Log Message:
-----------
start_jobs() --match logic was ignoring case in the
perl regex, make it consistent with --match in other
stuff
Modified Paths:
--------------
trunk/cbench/cbench.pl
Modified: trunk/cbench/cbench.pl
===================================================================
--- trunk/cbench/cbench.pl 2008-04-21 19:31:37 UTC (rev 295)
+++ trunk/cbench/cbench.pl 2008-04-21 20:08:20 UTC (rev 296)
@@ -839,7 +839,7 @@
# process the filename based on regex in $match
my $matchstr = "$match";
- next unless ($i =~ /$matchstr/i);
+ next unless ($i =~ /$matchstr/);
# number of processors in the job
my ($bench,$ppn,$num_proc) = ($i =~ /^(\S+)\-(\S+)ppn\-(\d+)$/);
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|