package BookPub::RDAS::Parser::SaleData::BarnesNoble::NextLink;

use lib '/app/tools/rdas/lib';
use base 'RDAS::Parser::Item';

use Data::Dumper;

sub value {
    my $token = shift->token() || return;
    my @result;

    my @a = $token->look_down( _tag => 'a', class => 'x47' );

    foreach my $record (@a) {
        if ( $record->as_text && $record->as_text =~ /Next/ ) {
            return $record->attr('href');
        }
    }

    return;
}

1;
