From 12cf5f937c64f5b751d1890511e23a1903718d3d Mon Sep 17 00:00:00 2001 From: Emoly Liu Date: Wed, 8 Feb 2017 16:07:30 +0800 Subject: [PATCH] LU-9085 llstat: don't use a hash as a reference This patch is to fix "Using a hash as a reference is deprecated" in llstat file. In the newer perl version, we should use "$xxx" instead of "%xxx" for a hash reference. Signed-off-by: Emoly Liu Change-Id: I67a1d1e365076b412550de775b115ac373589c60 Reviewed-on: https://review.whamcloud.com/25320 Reviewed-by: Bob Glossman Tested-by: Jenkins Tested-by: Maloo Reviewed-by: Jian Yu Reviewed-by: Oleg Drokin --- lustre/utils/llstat | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) mode change 100644 => 100755 lustre/utils/llstat diff --git a/lustre/utils/llstat b/lustre/utils/llstat old mode 100644 new mode 100755 index 918209b..940114f --- a/lustre/utils/llstat +++ b/lustre/utils/llstat @@ -55,7 +55,7 @@ sub readstat() chop; ($name, $cumulcount, $samples, $unit, $min, $max, $sum, $sumsquare) = split(/\s+/, $_); - $prevcount = %cumulhash->{$name}; + $prevcount = $cumulhash->{$name}; if (defined($prevcount)) { $diff = $cumulcount - $prevcount; if ($name eq "snapshot_time") { @@ -82,7 +82,7 @@ sub readstat() } if (defined($sum)) { my $sum_orig = $sum; - my $sum_diff = $sum - %sumhash->{$name}; + my $sum_diff = $sum - $sumhash->{$name}; if ($graphable) { printf " %s %lu %.2f %lu %s", $name, $sum_diff, ($sum_diff/$tdiff), $sum, $unit; @@ -118,8 +118,8 @@ sub readstat() $anysumsquare = 1; } } - %cumulhash->{$name} = $cumulcount; - %sumhash->{$name} = $sum; + $cumulhash->{$name} = $cumulcount; + $sumhash->{$name} = $sum; } #end of while } -- 1.8.3.1