# HG changeset patch # User Matti Hamalainen # Date 1530101329 -10800 # Node ID 362bd68d56861a2500a41b52d900eb8e1da2298f # Parent b5959a81c3f54a641b9379df39269e632b61ea01 More fixes. diff -r b5959a81c3f5 -r 362bd68d5686 nun/tasks/findreqs.pl --- a/nun/tasks/findreqs.pl Wed Jun 27 15:02:21 2018 +0300 +++ b/nun/tasks/findreqs.pl Wed Jun 27 15:08:49 2018 +0300 @@ -23,23 +23,24 @@ } elsif ($line =~ /^You now have '(.+)' at ([0-9]+)\% without special bonuses\.$/ && $wasFound) { - my $tmpName = lc($1); - my $tmpPercentage = $2; + my $spskName = $1; + my $spskPercentage = $2; + $spskName = uc(substr($spskName, 0, 1)).substr($spskName, 1); + $n = 10; - for my $taskName (@tmpList) { my $lcName = lc($taskName); - if (defined($taskList{$lcName}{$tmpName})) + if (defined($taskList{$lcName}{$spskName})) { - if ($tmpPercentage < $taskList{$lcName}{$tmpName}) + if ($spskPercentage < $taskList{$lcName}{$spskName}) { - $taskList{$lcName}{$tmpName} = $tmpPercentage; + $taskList{$lcName}{$spskName} = $spskPercentage; } } else { - $taskList{$lcName}{$tmpName} = $tmpPercentage; + $taskList{$lcName}{$spskName} = $spskPercentage; $taskNames{$lcName} = $taskName; } } @@ -111,7 +112,7 @@ { # No requirement data for task print_separator() if ($separator); - printf "| %-36s | %-31s |\n", $taskName, "UNKNOWN or no requirements"; + printf "| %-36s | %-31s |\n", $taskNames{$taskName}, "UNKNOWN or no requirements"; print_separator(); $separator = 1; }