summaryrefslogtreecommitdiff
path: root/tests/memanalyze.pl
diff options
context:
space:
mode:
authorDaniel Stenberg <daniel@haxx.se>2003-01-09 11:03:02 +0000
committerDaniel Stenberg <daniel@haxx.se>2003-01-09 11:03:02 +0000
commite2d249f8c5b7c111bea3196fef5a65fc0bf4a4ee (patch)
treedc163f443c43ba3f7f20f3a4256a1c8a544d06c9 /tests/memanalyze.pl
parent4a2ac166fa2761bf693424e0b2d66340af48c950 (diff)
downloadcurl-e2d249f8c5b7c111bea3196fef5a65fc0bf4a4ee.tar.gz
fixed to deal with file names that contain colons, as in Windows
Diffstat (limited to 'tests/memanalyze.pl')
-rwxr-xr-xtests/memanalyze.pl8
1 files 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(<STDIN>) {
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(<STDIN>) {
}
}
# 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(<STDIN>) {
}
}
# 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(<STDIN>) {
}
}
# ADDR url.c:1282 getaddrinfo() = 0x5ddd
- elsif($_ =~ /^ADDR ([^:]*):(\d*) (.*)/) {
+ elsif($_ =~ /^ADDR ([^ ]*):(\d*) (.*)/) {
# generic match for the filename+linenumber
$source = $1;
$linenum = $2;