#!/usr/bin/perl -w

use strict;

Test->start();

package Test;

use lib '/app/tools/common/lib';
use base 'Common::Script';

use lib '/app/tools/bookpub/lib';
use BookPub::RDAS::Request::ProductPrice::Apple;

sub run_process {
    my $self = shift;
    my $singleton = new Common::RSApp( clientID => 0 );

    my $request = new BookPub::RDAS::Request::ProductPrice::Apple( productID => 35020 );

    $request->run();
}