diff options
Diffstat (limited to 'eg/mapred_01.pl')
-rw-r--r-- | eg/mapred_01.pl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/eg/mapred_01.pl b/eg/mapred_01.pl index 76e26b2..f21d916 100644 --- a/eg/mapred_01.pl +++ b/eg/mapred_01.pl @@ -6,9 +6,8 @@ use 5.010; use Net::Riak; my $riak = Net::Riak->new(); -my $result; -$result = $riak->add('goog')->map(get_day_where_high_is('600.00'))->run; +my $result = $riak->add('goog')->map(get_day_where_high_is('600.00'))->run; say "days where high is over 600:"; map { say $_ } sort {$a cmp $b } @$result; |