summaryrefslogtreecommitdiffstats
path: root/lib/MooseX/Role/Matcher.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/MooseX/Role/Matcher.pm')
-rw-r--r--lib/MooseX/Role/Matcher.pm8
1 files changed, 5 insertions, 3 deletions
diff --git a/lib/MooseX/Role/Matcher.pm b/lib/MooseX/Role/Matcher.pm
index d621787..40f0331 100644
--- a/lib/MooseX/Role/Matcher.pm
+++ b/lib/MooseX/Role/Matcher.pm
@@ -17,9 +17,11 @@ use List::MoreUtils qw/any all/;
has phone => (is => 'ro', isa => 'Str');
package main;
- my @people = (Person->new(name => 'James', age => 22, phone => '555-1914'),
- Person->new(name => 'Jesse', age => 22, phone => '555-6287'),
- Person->new(name => 'Eric', age => 21, phone => '555-7634'));
+ my @people = (
+ Person->new(name => 'James', age => 22, phone => '555-1914'),
+ Person->new(name => 'Jesse', age => 22, phone => '555-6287'),
+ Person->new(name => 'Eric', age => 21, phone => '555-7634'),
+ );
# is James 22?
$people[0]->match(age => 22);