X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FWWW%2FSearch%2FTorrentz%2FResult.pm;h=6ab9955661d0f730f5d39b68cada984f0cea01ce;hb=9219ba0f6d0245607bea57c5da3784d4c51f8cf4;hp=7f0b5b402864ae1418793f0e5f7e75ae164786cb;hpb=318ef587a2564db160de293a79ff777220f10896;p=www-search-torrentz.git diff --git a/lib/WWW/Search/Torrentz/Result.pm b/lib/WWW/Search/Torrentz/Result.pm index 7f0b5b4..6ab9955 100644 --- a/lib/WWW/Search/Torrentz/Result.pm +++ b/lib/WWW/Search/Torrentz/Result.pm @@ -15,8 +15,7 @@ sub new{ my $self = $class->SUPER::new(@_); $self->{parsed} = 0; - no strict 'refs'; - $self->$_($args{$_}) for qw/title verified age size seeders leechers infohash/; + $self->_elem($_ => $args{$_}) for qw/title verified age size seeders leechers infohash/; $self->{ua} = $args{ua}; $self->add_url("https://torrentz.eu/$args{infohash}"); $self