diff options
author | Ingo Bürk <admin@airblader.de> | 2018-08-01 13:49:27 +0200 |
---|---|---|
committer | GitHub <noreply@github.com> | 2018-08-01 13:49:27 +0200 |
commit | fadd4d89b1e196e009d5cd5cc2f6c3bdda83b12e (patch) | |
tree | 0e8587ef2b978cc872d5cd53b957fbd18c2db717 /testcases/022-cpu-usage-tenth-cpu/cleanup.pl | |
parent | 639a67f752874142b1c081345fd36610e9046103 (diff) | |
parent | d003edcba6aaf29f74b904c09fc9dfdf3b2ff2cc (diff) |
Merge pull request #301 from wmarvel/issue300
Fix for issue 300: Correctly print usage for cpu 10
Diffstat (limited to 'testcases/022-cpu-usage-tenth-cpu/cleanup.pl')
-rw-r--r-- | testcases/022-cpu-usage-tenth-cpu/cleanup.pl | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/testcases/022-cpu-usage-tenth-cpu/cleanup.pl b/testcases/022-cpu-usage-tenth-cpu/cleanup.pl new file mode 100644 index 0000000..ac341be --- /dev/null +++ b/testcases/022-cpu-usage-tenth-cpu/cleanup.pl @@ -0,0 +1,15 @@ +#!/usr/bin/env perl + +use v5.10; +use strict; +use warnings; + +if ($#ARGV != 0 || ! -d $ARGV[0]) { + say "Error with cleanup script: argument not provided or not a directory"; + exit 1; +} + +my $output_file = "$ARGV[0]/stat"; +if (-f $output_file) { + unlink $output_file; +} |