Whamcloud - gitweb
git://git.whamcloud.com
/
fs
/
lustre-release.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
New tag 2.3.59
[fs/lustre-release.git]
/
lustre
/
utils
/
llanalyze
diff --git
a/lustre/utils/llanalyze
b/lustre/utils/llanalyze
index
c794c70
..
5aa8ffd
100644
(file)
--- a/
lustre/utils/llanalyze
+++ b/
lustre/utils/llanalyze
@@
-67,7
+67,7
@@
sub extractpid
{
$line = shift;
# print "$_\n";
- if ($line =~
m/\d+:\d+:\d+:\d+\.\d+:\d+:\d+:*$
/) {
+ if ($line =~
/(\d+)\:(\d+)\:(\d+)\:(\d+\.\d+)\:(\d+)\:(\d+)\:.*
/) {
return $6;
}
}
@@
-76,7
+76,7
@@
sub extracthostpid
{
$line = shift;
# print "$_\n";
- if ($line =~
m/\d+:\d+:\d+:\d+\.\d+:\d+:\d+:\d+:*$
/) {
+ if ($line =~
/(\d+)\:(\d+)\:(\d+)\:(\d+\.\d+)\:(\d+)\:(\d+)\:(\d+)\:.*
/) {
return $7;
}
}
@@
-271,15
+271,15
@@
print "pid: $pid, dlm_ns: $dlm_ns\n";
print "extract_start: $extract_start\n";
print "extract_end: $extract_end\n";
while (<LOG>) {
- if ($extract_start && $extract_start
!= LLANAYZE_FOUND
) {
+ if ($extract_start && $extract_start
ne "LLANAYZE_FOUND"
) {
next if (index($_, $extract_start, 0) == -1);
- $extract_start =
LLANAYZE_FOUND
;
+ $extract_start =
"LLANAYZE_FOUND"
;
}
if ($extract_end) {
-
next if ($extract_end == LLANAYZE_FOUND
);
+
next if ($extract_end eq "LLANAYZE_FOUND"
);
if (index($_, $extract_end, 0) != -1) {
- $extract_end =
LLANAYZE_FOUND
;
+ $extract_end =
"LLANAYZE_FOUND"
;
}
}