find-hrefs ( vector -- vector' )

Vocabulary

html.parser.analyzer

Inputs

vector

an object

Outputs

vector'

an object

Definition

USING: accessors combinators.short-circuit kernel sequences urls
;

IN: html.parser.analyzer

: find-hrefs ( vector -- vector' )
    [ { [ name>> "a" = ] [ "href" attribute? ] } 1&& ] filter
    sift [ "href" attribute >url ] map ;