From e2d249f8c5b7c111bea3196fef5a65fc0bf4a4ee Mon Sep 17 00:00:00 2001 From: Daniel Stenberg Date: Thu, 9 Jan 2003 11:03:02 +0000 Subject: [PATCH] fixed to deal with file names that contain colons, as in Windows --- tests/memanalyze.pl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/tests/memanalyze.pl b/tests/memanalyze.pl index 73d1aa603..71fc1fde1 100755 --- a/tests/memanalyze.pl +++ b/tests/memanalyze.pl @@ -30,7 +30,7 @@ while() { chomp $_; $line = $_; - if($line =~ /^MEM ([^:]*):(\d*) (.*)/) { + if($line =~ /^MEM ([^ ]*):(\d*) (.*)/) { # generic match for the filename+linenumber $source = $1; $linenum = $2; @@ -130,7 +130,7 @@ while() { } } # FD url.c:1282 socket() = 5 - elsif($_ =~ /^FD ([^:]*):(\d*) (.*)/) { + elsif($_ =~ /^FD ([^ ]*):(\d*) (.*)/) { # generic match for the filename+linenumber $source = $1; $linenum = $2; @@ -157,7 +157,7 @@ while() { } } # FILE url.c:1282 fopen("blabla") = 0x5ddd - elsif($_ =~ /^FILE ([^:]*):(\d*) (.*)/) { + elsif($_ =~ /^FILE ([^ ]*):(\d*) (.*)/) { # generic match for the filename+linenumber $source = $1; $linenum = $2; @@ -185,7 +185,7 @@ while() { } } # ADDR url.c:1282 getaddrinfo() = 0x5ddd - elsif($_ =~ /^ADDR ([^:]*):(\d*) (.*)/) { + elsif($_ =~ /^ADDR ([^ ]*):(\d*) (.*)/) { # generic match for the filename+linenumber $source = $1; $linenum = $2;