hello
there
hello
there
foo
' ); $q = Web::Query->new( undef ); ``` This method throw the exception on unknown `$stuff`. This method returns undefined value on non-successful response with URL. Currently, the only two valid options are *indent*, which will be used as the indentation string if the object is printed, and *no\_space\_compacting*, which will prevent the compaction of whitespace characters in text blocks. - my $q = Web::Query-\>new\_from\_element($element: HTML::Element) Create new instance of Web::Query from instance of HTML::Element. - "my $q = Web::Query-\>new\_from\_html($html: Str)" Create new instance of Web::Query from HTML. - my $q = Web::Query-\>new\_from\_url($url: Str) Create new instance of Web::Query from URL. If the response is not success(It means /^20\[0-9\]$/), this method returns undefined value. You can get a last result of response, use the `$Web::Query::RESPONSE`. Here is a best practical code: ``` my $url = 'http://example.com/'; my $q = Web::Query->new_from_url($url) or die "Cannot get a resource from $url: " . Web::Query->last_response()->status_line; ``` - my $q = Web::Query-\>new\_from\_file($file\_name: Str) Create new instance of Web::Query from file name. ### TRAVERSING *add* Returns a new object augmented with the new element(s). - add($html) An HTML fragment to add to the set of matched elements. - add(@elements) One or more `@elements` to add to the set of matched elements. `@elements` that already are part of the set are not added a second time. ``` my $group = $wq->find('#foo'); # collection has 1 element $group = $group->add( '#bar', $wq ); # 2 elements $group->add( '#foo', $wq ); # still 2 elements ``` - add($wq) An existing Web::Query object to add to the set of matched elements. - add($selector, $context) `$selector` is a string representing a selector expression to find additional elements to add to the set of matched elements. `$context` is the point in the document at which the selector should begin matching *contents* Get the immediate children of each element in the set of matched elements, including text and comment nodes. *each* Visit each nodes. `$i` is a counter value, 0 origin. `$elem` is iteration item. `$_` is localized by `$elem`. ``` $q->each(sub { my ($i, $elem) = @_; ... }) ``` *end* Back to the before context like jQuery. *filter* Reduce the elements to those that pass the function's test. ``` $q->filter(sub { my ($i, $elem) = @_; ... }) ``` *find* Get the descendants of each element in the current set of matched elements, filtered by a selector. ``` my $q2 = $q->find($selector); # $selector is a CSS3 selector. ``` **NOTE** If you want to match the element itself, use "filter". **INCOMPATIBLE CHANGE** From v0.14 to v0.19 (inclusive) **find()** also matched the element itself, which is not jQuery compatible. You can achieve that result using `filter()`, `add()` and `find()`: ``` my $wq = wq('bar
bar
bar
``` *first* Return the first matching element. This method constructs a new Web::Query object from the first matching element. *last* Return the last matching element. This method constructs a new Web::Query object from the last matching element. *match($selector)* Returns a boolean indicating if the elements match the `$selector`. In scalar context returns only the boolean for the first element. For the reverse of `not()`, see `filter()`. *not($selector)* Returns all the elements not matching the `$selector`. ``` # $do_for_love will be every thing, except #that my $do_for_love = $wq->find('thing')->not('#that'); ``` *and\_back* Add the previous set of elements to the current one. ``` # get the h1 plus everything until the next h1 $wq->find('h1')->next_until('h1')->and_back; ``` *map* Creates a new array with the results of calling a provided function on every element. ``` $q->map(sub { my ($i, $elem) = @_; ... }) ``` *parent* Get the parent of each element in the current set of matched elements. *prev* Get the previous node of each element in the current set of matched elements. ``` my $prev = $q->prev; ``` *next* Get the next node of each element in the current set of matched elements. ``` my $next = $q->next; ``` *next\_until( $selector )* Get all subsequent siblings, up to (but not including) the next node matched `$selector`. ### MANIPULATION *add\_class* Adds the specified class(es) to each of the set of matched elements. ``` # add class 'foo' toelements wq('
foo
bar
foo
foo
barfoo
')->as_html; #foo
foo
bar
foo
!bar
``` *" attr "* Get/set attribute values. In getter mode, it'll return either the values of the attribute for all elements of the set, or only the first one depending of the calling context. ``` my @values = $q->attr('style'); # style of all elements my $first_value = $q->attr('style'); # style of first element ``` In setter mode, it'll set attributes value for all elements, and return back the original object for easy chaining. ``` $q->attr( 'alt' => 'a picture' )->find( ... ); # can pass more than 1 element too $q->attr( alt => 'a picture', src => 'file:///...' ); ``` The value passed for an attribute can be a code ref. In that case, the code will be called with `$_` set to the current attribute value. If the code modifies `$_`, the attribute will be updated with the new value. ``` $q->attr( alt => sub { $_ ||= 'A picture' } ); ``` *" id "* Get/set the elements's id attribute. In getter mode, it behaves just like `attr()`. In setter mode, it behaves like `attr()`, but with the following exceptions. If the attribute value is a scalar, it'll be only assigned to the first element of the set (as ids are supposed to be unique), and the returned object will only contain that first element. ``` my $first_element = $q->id('the_one'); ``` It's possible to set the ids of all the elements by passing a sub to `id()`. The sub is given the same arguments as for `each()`, and its return value is taken to be the new id of the elements. ``` $q->id( sub { my $i = shift; 'foo_' . $i } ); ``` *" name "* Get/set the elements's 'name' attribute. ``` my $name = $q->name; # equivalent to $q->attr( 'name' ); $q->name( 'foo' ); # equivalent to $q->attr( name => 'foo' ); ``` *" data "* Get/set the elements's 'data-\*name\*' attributes. ``` my $data = $q->data('foo'); # equivalent to $q->attr( 'data-foo' ); $q->data( 'foo' => 'bar' ); # equivalent to $q->attr( 'data-foo' => 'bar' ); ``` *tagname* Get/Set the tag name of elements. ``` my $name = $q->tagname; $q->tagname($new_name); ``` *before* Insert content, specified by the parameter, before each element in the set of matched elements. ``` wq('foo
foo
foo
'); ``` *insert\_before* Insert every element in the set of matched elements before the target. *insert\_after* Insert every element in the set of matched elements after the target. *" prepend "* Insert content, specified by the parameter, to the beginning of each element in the set of matched elements. *remove* Delete the elements associated with the object from the DOM. ``` # remove all