X-Git-Url: https://git.lttng.org/?p=lttng-tools.git;a=blobdiff_plain;f=tests%2Futils%2Fbabelstats.pl;h=53c85d4d0fd6974202adf6a8b0a8db4fafaf51fc;hp=64a243fc8a69f8b1428d8bf7c5a2231cc8756afd;hb=568d7e2db7370f57e9612eb9b8c1a6b0bf5213cd;hpb=815535ae5260a74761a0df31aab4d55917b002d4

diff --git a/tests/utils/babelstats.pl b/tests/utils/babelstats.pl
index 64a243fc8..53c85d4d0 100755
--- a/tests/utils/babelstats.pl
+++ b/tests/utils/babelstats.pl
@@ -118,7 +118,7 @@ sub print_fields_stats
 
 	foreach my $field (keys %{$merged_ref->{$tracepoint}}) {
 		my @sorted;
-		my @val = keys ($merged_ref->{$tracepoint}->{$field});
+		my @val = keys %{$merged_ref->{$tracepoint}->{$field}};
 
 		if ($val[0] =~ /^\d+$/) {
 			# Sort numerically