NAME

Auction::Bid - Information on an auction bid

SYNOPSIS

  my $a_bid = Auction::Bid->new($bidid);

  my $bidid = $a_bid->bid_id; 
  my $id = $a_bid->id;

  my $customerid = $a_bid->customerid;

  my $item = $a_bid->item;

  my $bid = $a_bid->bid;

  my $date = $a_bid->date;
  my $time = $a_bid->time; 

  my @bids = Auction::Bid->for_item($a_item);

  my $a_bid = Auction::Bid->make_bid({ item       => $a_item,
                                       customerid => $customerid,
                                       bid        => $bid, });

DESCRIPTION

This module provides information on an auction bid.

YOU HAVE TO GET YOURSELF A DATABASE HANDLE!! I don't know how you connect to your database, so I leave that for an exercise for the reader.

FACTORY METHODS

new

  my $a_bid = Auction::Bid->new($bidid);  

Make a new auction bid object.

for_item

  my @bids = Auction::Bid->for_item($a_item);

This will return a list of Bid objects for the auction item.

make_bid

  my $a_bid = Auction::Bid->make_bid({ item       => $a_item,
                                       customerid => $customerid,
                                       bid        => $bid, });

This will make a bid on the auction item.

INSTANCE METHODS

bid_id

  my $bidid = $a_bid->bid_id;

This will return the bid id.

id

  my $id = $a_bid->id;

This is synonomous with bid_id.

customerid

  my $customer = $a_bid->customer;

This will return the customerid of who made the bid.

item

  my $item = $a_bid->item;

This will return the auction item.

bid

  my $bid = $a_bid->bid;

This will return the bid for that bid id.

date

  my $date = $a_bid->date;

This will return the Date::Simple of the bid

NOTE: This does not include the time of the bid.

time

  my $time = $a_bid->time;

This will return the time of the bid on the day it was made.

BUGS

None known

TODO

Nothing known

COPYRIGHT

Copyright (C) 2001 mwk. All rights reserved.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

AUTHOR

MWKerr, <coder@stray-toaster.co.uk>

cpanm Auction::Bid

perl -MCPAN -e shell
install Auction::Bid