From abe2973b4270201be719ea18ea83cd442adaa0e6 Mon Sep 17 00:00:00 2001
From: Luis Mochan <mochan@fis.unam.mx>
Date: Mon, 5 Apr 2021 15:13:12 -0500
Subject: Correct output

---
 challenge-107/wlmb/perl/ch-2.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'challenge-107')

diff --git a/challenge-107/wlmb/perl/ch-2.pl b/challenge-107/wlmb/perl/ch-2.pl
index dae450a85e..a284c11a2d 100755
--- a/challenge-107/wlmb/perl/ch-2.pl
+++ b/challenge-107/wlmb/perl/ch-2.pl
@@ -12,7 +12,8 @@ die 'Use: ./ch-2.pl package [other package] [...]' unless @ARGV;
 foreach my $package(@ARGV){
     eval "require $package";
     die $@ if $@;
+    say "Methods of $package";
     foreach my $key(sort keys %{"${package}::"}){
-	say $key if defined &{"${package}::$key"};
+	say "\t$key" if defined &{"${package}::$key"};
     }
 }
-- 
cgit