Bug #45220 for Data-Pareto: Problem with the example

Wed Apr 22 11:43:12 2009 emmanuel.Jeannot [...] loria.fr - Ticket created

Subject:	Problem with the example
Date:	Wed, 22 Apr 2009 17:42:32 +0200
To:	bug-Data-Pareto [...] rt.cpan.org
From:	Emmanuel Jeannot <emmanuel.Jeannot [...] loria.fr>

Hi. I tried the example, but it is not working: Show quoted text

> more test.pl

use Data::Pareto; # only first and third columns are used in comparison # the others are simply descriptive my $set = new Data::Pareto(columns => [0, 2]); $set->add( [ 5, "pareto", 10, 11 ], [ 5, "dominated", 11, 9 ], [ 4, "pareto2", 12, 12 ] ); # this returns [ [ 5, "pareto", 10, 11 ], [ 4, "pareto2", 12, 12 ] ], # the other one is dominated on selected columns $set->get_pareto_ref; Show quoted text

> perl test.pl

Can't use string ("columns") as a HASH ref while "strict refs" in use at /Library/Perl/5.8.8/Data/Pareto.pm line 111. Can you tell me what's wrong? Best regards, --Emmanuel

Wed Apr 22 17:02:52 2009 PWES [...] cpan.org - Taken

Wed Apr 22 17:05:28 2009 PWES [...] cpan.org - Status changed from 'new' to 'open'

Wed Apr 22 17:05:28 2009 PWES [...] cpan.org - Severity Normal added

Wed Apr 22 17:05:28 2009 PWES [...] cpan.org - Broken in 0.01 added

Wed Apr 22 17:11:32 2009 PWES [...] cpan.org - Correspondence added

You are right, the problem is with example. new() expects a single argument, hashref. To make it work, please change the line: my $set = new Data::Pareto(columns => [0, 2]); to my $set = new Data::Pareto({ columns => [0, 2] }); The change to documentation will go with the next release.

Mon Jun 01 17:19:32 2009 PWES [...] cpan.org - Status changed from 'open' to 'resolved'

Mon Jun 01 17:19:58 2009 PWES [...] cpan.org - Fixed in 0.03 added