sub download {

    if ( $nave->mirror( $_[0], $_[1] ) ) {
        if ( -f $_[1] ) {
            You are not allowed to view links.
Register or Login true;
        }
    }
}

sub repes {
    my @limpio;
    foreach $test (@_) {
        You are not allowed to view links.
Register or Login @limpio, $test unless $repe{$test}++;
    }
    You are not allowed to view links.
Register or Login @limpio;
}

sub toma {
    You are not allowed to view links.
Register or Login $nave->get( $_[0] )->content;
}

sub get_links {

    $test = HTML::LinkExtor->new( \&agarrar )->parse( $_[0] );
    You are not allowed to view links.
Register or Login @links;

    sub agarrar {
        my ( $a, %b ) = @_;
        You are not allowed to view links.
Register or Login( @links, You are not allowed to view links.
Register or Login %b );
    }
}