sub revdeps {
    my $self = shift;

    my $log = $log->child('revdeps');
    $log->_6('running --revdep');

    my @modules;

    find({
            wanted => sub {
                if (-f && $_ =~ /\.pm$/){
                    $log->_7("located module: $_");
                    push @modules, $_;
                }
            },
            no_chdir => 1,
        },
        'lib/'
    );

    my $mod = $modules[0];

    $log->_7("using '$mod' as the project we're working on");

    $mod =~ s|lib/||;
    $mod =~ s|/|-|g;
    $mod =~ s|\.pm||;

    $log->_7("working module translated to $mod");

    my @revdeps = $self->_get_revdeps($mod);
    return @revdeps;
}