Select Code to Download

sub mk_kv; sub reverse_hoa;

...
    }
    return %reversed;
}

sub remove; sub remove_down; sub remove_up;
my $down = { map { mk_kv split / /, $_ } split /\n/, $graph }; # $down
+->{$key} is an arrayref of the modules downstream from $key
...
        ();
}
}