From a76f0d2fa04a686536c2d937c2b3f16b3aec4caa Mon Sep 17 00:00:00 2001 From: Steven McDonald Date: Sat, 8 Nov 2014 23:21:17 +1100 Subject: [PATCH] Don't use keys on a hashref Older Perls don't handle this properly, and it'd be nice to be able to use this on older versions of OpenBSD. --- devtree/devtree | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/devtree/devtree b/devtree/devtree index adadaae..ed094b7 100755 --- a/devtree/devtree +++ b/devtree/devtree @@ -47,7 +47,7 @@ sub print_tree { my $prev_indent = shift || ""; my $indent = $prev_indent . " |"; my $count = 0; - my @keys = keys $tree; + my @keys = keys %$tree; for (sort @keys) { my $name = $_; -- 2.30.2