App-BarnesNoble-WishListMinder

 view release on metacpan or  search on metacpan

bin/bn-wishlist  view on Meta::CPAN


By default, when listing books by title or author, if multiple books
match the search term, bn-wishlist displays only the EAN, current
price, title, and author of each matching book.  If only one book
matches, it displays the full price history of that book.  This option
causes it to display the full price history for each match.

=item C<--configure>

Display the location of the F<config.ini> file, and open it in a text
editor if possible.  If the config file does not exist, a skeleton one
will be created.

=item C<--email> (abbreviated C<-e>)

Send a Price Drop Alert email if any books have been reduced in price
since the last update.  Implies C<--update>.

=item C<--help>

Display the usage message.

lib/App/BarnesNoble/WishListMinder.pm  view on Meta::CPAN


; Next, you need one or more wishlists to monitor.
; Each wishlist must have a unique name in [brackets].

[My Wishlist]
wishlist = WISHLIST URL HERE
END CONFIG
    say "\nYou need to replace the ALL CAPS placeholders with the correct values.";
  }

  if (my $editor = $ENV{VISUAL} || $ENV{EDITOR}) {
    require Text::ParseWords;
    system(Text::ParseWords::shellwords($editor), "$config_file");
  }
} # end configure

#---------------------------------------------------------------------
sub create_database_schema
{
  my ($self, $dbh) = @_;

  $dbh->do("PRAGMA foreign_keys = ON");

lib/App/BarnesNoble/WishListMinder.pm  view on Meta::CPAN


  print "$name $VERSION\n";
  exit if $_[0] and $_[0] eq 'version';
  print <<"END USAGE";
\nUsage:  $name [options] [EAN_or_TITLE_or_AUTHOR] ...
  -a, --all-history        Show price history even when multiple items match
  -e, --email              Send Price Drop Alert email (implies --update)
  -q, --quiet              Don't print list of updates
  -s, --since=DATE         Print books whose price changed on or after DATE
  -u, --update             Download current prices from wishlist
      --configure          Create and/or edit the config file
      --help               Display this help message
      --version            Display version information
END USAGE

    exit;
} # end usage
#---------------------------------------------------------------------

sub run
{



( run in 0.368 second using v1.01-cache-2.11-cpan-de7293f3b23 )