[gitmo/moose-presentations.git] / moose-class / exercises / t / 02-roles.t

# Your tasks ...
#
# Create a Printable role. This role should simply require that the
# consuming class implement an "as_string" method.
#
# Make the Person class from the last set of exercises consume this
# role. Use full_name as the output for the as_string method. The
# Employee subclass should still override this output.
#
# Implement a role HasAccount. This should provide a read-write
# "balance" attribute. It should also implement "deposit" and
# "withdraw" methods. Attempting to reduce the cash balance below 0
# via "withdraw" should die with an error that includes the string:
#
#  Balance cannot be negative
#
# Make the Person class consumes thi role as well.
#
# Make sure all roles are free of Moose droppings.

use strict;
use warnings;

use lib 't/lib';

use MooseClass::Tests;

use Person;
use Employee;

MooseClass::Tests::tests02();
Commit	Line	Data
10086130	1	# Your tasks ...
	2	#
	3	# Create a Printable role. This role should simply require that the
	4	# consuming class implement an "as_string" method.
	5	#
	6	# Make the Person class from the last set of exercises consume this
83c2705f	7	# role. Use full_name as the output for the as_string method. The
10086130	8	# Employee subclass should still override this output.
10086130	9	#
b4d2756a	10	# Implement a role HasAccount. This should provide a read-write
10086130	11	# "balance" attribute. It should also implement "deposit" and
	12	# "withdraw" methods. Attempting to reduce the cash balance below 0
	13	# via "withdraw" should die with an error that includes the string:
	14	#
	15	# Balance cannot be negative
	16	#
d147eba5	17	# Make the Person class consumes thi role as well.
10086130	18	#
	19	# Make sure all roles are free of Moose droppings.
	20
	21	use strict;
	22	use warnings;
	23
	24	use lib 't/lib';
	25
	26	use MooseClass::Tests;
	27
	28	use Person;
	29	use Employee;
	30
	31	MooseClass::Tests::tests02();