From 1f66eff4c0eebc4515a43c8c76f57c8159cf2c86 Mon Sep 17 00:00:00 2001 From: doy Date: Sun, 7 Dec 2008 02:38:56 -0500 Subject: reformatting --- lib/MooseX/Role/Matcher.pm | 8 +++++--- 1 file 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); -- cgit v1.2.3