diff options
Diffstat (limited to 'NPTest.pm')
-rw-r--r-- | NPTest.pm | 7 |
1 files changed, 7 insertions, 0 deletions
@@ -596,6 +596,13 @@ sub output { | |||
596 | } | 596 | } |
597 | } | 597 | } |
598 | 598 | ||
599 | sub perf_output { | ||
600 | my $self = shift; | ||
601 | $_ = $self->{output}; | ||
602 | s/[^|]*\|//; | ||
603 | return $_; | ||
604 | } | ||
605 | |||
599 | sub testCmd { | 606 | sub testCmd { |
600 | my $class = shift; | 607 | my $class = shift; |
601 | my $command = shift or die "No command passed to testCmd"; | 608 | my $command = shift or die "No command passed to testCmd"; |