dougm       01/05/07 22:17:24

  Modified:    Apache-Test/lib/Apache TestConfigParse.pm
  Log:
  local $_
  
  Revision  Changes    Path
  1.4       +1 -0      modperl-2.0/Apache-Test/lib/Apache/TestConfigParse.pm
  
  Index: TestConfigParse.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/Apache-Test/lib/Apache/TestConfigParse.pm,v
  retrieving revision 1.3
  retrieving revision 1.4
  diff -u -r1.3 -r1.4
  --- TestConfigParse.pm        2001/04/25 04:35:20     1.3
  +++ TestConfigParse.pm        2001/05/08 05:17:24     1.4
  @@ -222,6 +222,7 @@
       my $cmd = "$httpd -v";
       open my $v, '-|', $cmd or die "$cmd failed: $!";
   
  +    local $_;
       while (<$v>) {
           next unless s/^Server\s+version:\s*//i;
           chomp;
  
  
  

Reply via email to