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>