in reply to Problem using GD::Graph::MAP with Graph::pie

my @data = (
     ["1st","2nd","3rd","4th","5th","6th"],
     [    4,    2,    3,    4,    3,  3.5]
);
my @hrefs = ["http://www.perl.org", "http://www.cpan.org", "http://fre
+shmeat.net", "javascript:alert('Example of using JavaScript');","http
+://www.perl.org","http://www.perl.org"]
my $my_graph = new GD::Graph::pie();

$my_graph->set(
        title => 'A Pie Chart',
        label => 'Label',
        axislabelclr => 'black',
        pie_height => 36,
);

open (PNG, ">essai.png");
binmode PNG; #only for Windows like platforms
print PNG $my_graph->plot(\@data)->png;
close PNG;



my $map = new GD::Graph::Map($my_graph,hrefs => \@hrefs);
my $HTML_Map_tests = $map->imagemap("essai.png", \@data);

my $html;
$html = "<html>\n";
$html .= "<head>\n";
$html .= "  <title>essai</title>\n";
$html .= "  <meta http-equiv=\"content-type\"\n";
$html .= " content=\"text/html; charset=ISO-8859-1\">\n";
$html .= "</head>\n";



$html .= "<BODY bgcolor = \"#ffffff\">\n";

$html .= "$HTML_Map_tests ";

$html .= "</body></html>";

open (FILE,">essai.html");
print FILE $html;
print "    ...File essai.html has been generated\n";
close (FILE);

[download]
Use of uninitialized value in numeric lt (<) at /usr/local/lib/perl5/s
+ite_perl/5.6.1/GD/Graph/Map.pm line 367.
Use of uninitialized value in numeric lt (<) at /usr/local/lib/perl5/s
+ite_perl/5.6.1/GD/Graph/Map.pm line 361.
Use of uninitialized value in numeric gt (>) at /usr/local/lib/perl5/s
+ite_perl/5.6.1/GD/Graph/Map.pm line 310.
Use of uninitialized value in numeric gt (>) at /usr/local/lib/perl5/s
+ite_perl/5.6.1/GD/Graph/Map.pm line 311.
Use of uninitialized value in numeric gt (>) at /usr/local/lib/perl5/s
+ite_perl/5.6.1/GD/Graph/Map.pm line 366.
Use of uninitialized value in numeric lt (<) at /usr/local/lib/perl5/s
+ite_perl/5.6.1/GD/Graph/Map.pm line 367.
Use of uninitialized value in numeric lt (<) at /usr/local/lib/perl5/s
+ite_perl/5.6.1/GD/Graph/Map.pm line 361.
Use of uninitialized value in numeric eq (==) at /usr/local/lib/perl5/
+site_perl/5.6.1/GD/Graph/Map.pm line 309.
Use of uninitialized value in numeric eq (==) at /usr/local/lib/perl5/
+site_perl/5.6.1/GD/Graph/Map.pm line 309.
Use of uninitialized value in numeric eq (==) at /usr/local/lib/perl5/
+site_perl/5.6.1/GD/Graph/Map.pm line 309.
Use of uninitialized value in numeric eq (==) at /usr/local/lib/perl5/
+site_perl/5.6.1/GD/Graph/Map.pm line 309.
Use of uninitialized value in numeric eq (==) at /usr/local/lib/perl5/
+site_perl/5.6.1/GD/Graph/Map.pm line 309.
Use of uninitialized value in numeric eq (==) at /usr/local/lib/perl5/
+site_perl/5.6.1/GD/Graph/Map.pm line 309.
Use of uninitialized value in numeric eq (==) at /usr/local/lib/perl5/
+site_perl/5.6.1/GD/Graph/Map.pm line 309.
    ...File essai.html has been generated

[download]
How can i do?

Replies are listed 'Best First'.
Re: Re: Problem using GD::Graph::MAP with Graph::pie
by matija (Priest) on May 10, 2004 at 17:00 UTC
    The documentation for GD::Graph::MAP specificaly states that @hrefs array must have the same size (i.e. same number of elements) as the nuber of legends. You have 6 legends but only four elements of hrefs.
[reply]
[reply]

In Section Seekers of Perl Wisdom