Money::PaymentPreparer - change sum to bills and coins.


NAME

Money::PaymentPreparer - change sum to bills and coins.


VERSION

Version 0.03


SYNOPSIS

 use Money::PaymentPreparer;
 my @my_bills  = qw (200 100 50 20 10 5 2 1);
 my $object = PaymentPreparer->new();
 $object->set_bill(@my_bills);
 $object->add(153);
 $object->add(68);
 %result = $object->get();


DESCRIPTION

This module change sum (i.e. payment) to collection of bills and coins and keep it all in one hash returned by add or get.

new
creates the object.

set_bill
gets @list of nominations bills and coins. In Europe it should looks like this:

@my_table = qw (500 200 100 50 20 10 5 2 1);

add
value to change. It returns %hash of nominals with numbers of bills.

get
returns %hash of nominals with numbers of bills.


TO DO

Support for decimal values.

Check for indivisible values.


AUTHOR

Łukasz M±drzycki, <uksza@cpan.org>.


BUGS

Who knows...


ACKNOWLEDGEMENTS

All Perl family.


COPYRIGHT & LICENSE

Copyright(C) 2004, 2005 Łukasz M±drzycki, <uksza@cpan.org>. All rights reserved.

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

 Money::PaymentPreparer - change sum to bills and coins.