Test::Proto::Where

	use Test::Proto::Where; # exports all symbols by default
	print test_subject {foo=>'bar'} =>
		where [], sub{ 'Empty array' },
		where pHash, sub{ 'A hash' },
		otherwise sub { 'Something else' };

Uses Test::Proto and its upgrading feature to implement a dispatch.

Note: This module is presently EXPERIMENTAL.

INSTALLATION

To install this module, run the following commands:

	perl Makefile.PL
	make
	make test
	make install

SUPPORT AND DOCUMENTATION

After installing, you can find documentation for this module with the
perldoc command.

	perldoc Test::Proto::Where

You can also look for information at:

	http://github.com/pdl/Test-Proto-Where

LICENSE AND COPYRIGHT

Copyright (C) 2013 Daniel Perrett

This program is free software; you can redistribute it and/or modify it
under the terms of either: the GNU General Public License as published
by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.