use warnings;
use parent qw/WWW::SearchResult/;
-our $VERSION = '0.001002';
+our $VERSION = '0.001003';
use HTML::TreeBuilder;
use URI::Escape qw/uri_escape/;
my $trackers = $tree->look_down(class => 'trackers');
$self->{trackers} //= [];
for my $tracker ($trackers->find('dl')) {
- push $self->{trackers}, $tracker->find('a')->as_text;
+ push @{$self->{trackers}}, $tracker->find('a')->as_text;
}
my $files = $tree->look_down(class => 'files');
} else {
$child->objectify_text;
my ($filename, $size) = $child->find('~text');
- push $self->{files}, +{
+ push @{$self->{files}}, +{
path => $prefix.$filename->attr('text'),
size => $size->attr('text')
}