<p dir="ltr">Looking at your code, it seems that the two data structures would be completely different.</p>
<p dir="ltr">The example data in @data2 consists of two array references: one for labels and one for values. Essentially, it's a 2D matrix.</p>
<p dir="ltr">Your @data array would just directly contain values not wrapped within an array reference, and with no labels.</p>
<p dir="ltr">I haven't played with GD::Graph or read its documentation, so that format may be acceptable.</p>
<p dir="ltr">To get the two arrays identical in structure though, you could add this after the "for" loop:</p>
<p dir="ltr">@data = (\@status, \@data);</p>
<div class="gmail_quote">On 10/09/2014 7:01 am, "Bryon Baker" <<a href="mailto:bbaker@copesan.com">bbaker@copesan.com</a>> wrote:<br type="attribution"><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div lang="EN-US" link="blue" vlink="purple">
<div>
<p class="MsoNormal">Hello all I am trying to create some custom graphs. The issue I am have is getting the data in the right format for GD:Graph<u></u><u></u></p>
<p class="MsoNormal"><u></u> <u></u></p>
<p class="MsoNormal">Using data dumper I can see that I am getting the correct data. Per GD::Graph when I pass the data object to GD::Graph it is in an invalid format.<u></u><u></u></p>
<p class="MsoNormal"><u></u> <u></u></p>
<p class="MsoNormal">In the code I use the object @data for the data from Request tracker. The data2 object I built for testing and it works fine.<u></u><u></u></p>
<p class="MsoNormal"><u></u> <u></u></p>
<p class="MsoNormal">Thanks in advance for the help.<u></u><u></u></p>
<p class="MsoNormal"><u></u> <u></u></p>
<p class="MsoNormal">Here is my test code snippet.<u></u><u></u></p>
<p class="MsoNormal"><u></u> <u></u></p>
<p class="MsoNormal"><u></u> <u></u></p>
<p class="MsoNormal">my @data;<u></u><u></u></p>
<p class="MsoNormal">my @status = qw[new assigned opened evaluation closed];<u></u><u></u></p>
<p class="MsoNormal">for my $status (@status) <u></u><u></u></p>
<p class="MsoNormal">{<u></u><u></u></p>
<p class="MsoNormal"> my $search = new RT::Tickets($RT::SystemUser);<u></u><u></u></p>
<p class="MsoNormal"> $search->FromSQL("Queue = 'cerby' AND Status = '$status'");<u></u><u></u></p>
<p class="MsoNormal"> push @data, $search->Count;<u></u><u></u></p>
<p class="MsoNormal"> #print Dumper(\@data);<u></u><u></u></p>
<p class="MsoNormal"> print Dumper(\$search);<u></u><u></u></p>
<p class="MsoNormal">}<u></u><u></u></p>
<p class="MsoNormal">my @data2 = ( <u></u><u></u></p>
<p class="MsoNormal"> ["1st","2nd","3rd","4th"],<u></u><u></u></p>
<p class="MsoNormal"> [ 1, 3.5, 5, 6 ],<u></u><u></u></p>
<p class="MsoNormal">);<u></u><u></u></p>
<p class="MsoNormal"><u></u> <u></u></p>
<p class="MsoNormal">print Dumper(\@data2);<u></u><u></u></p>
<p class="MsoNormal">my $pie = GD::Graph::pie->new(400, 400);<u></u><u></u></p>
<p class="MsoNormal">$pie->set( <u></u><u></u></p>
<p class="MsoNormal"># accentclr => undef, <u></u><u></u></p>
<p class="MsoNormal"> '3d' => 0,<u></u><u></u></p>
<p class="MsoNormal">) or die $pie->error;<u></u><u></u></p>
<p class="MsoNormal">my $img1 = $pie->plot(\@data2) or die $pie->error;<u></u><u></u></p>
<p class="MsoNormal">open(IMG, '>pie.png') or die $!;<u></u><u></u></p>
<p class="MsoNormal">binmode IMG;<u></u><u></u></p>
<p class="MsoNormal">print IMG $img1->png;<u></u><u></u></p>
<p class="MsoNormal"><u></u> <u></u></p>
<p class="MsoNormal">Thanks<u></u><u></u></p>
<p class="MsoNormal"><u></u> <u></u></p>
<p class="MsoNormal"><span style="font-size:10.0pt;font-family:"Arial","sans-serif";color:black">Bryon Baker<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-size:10.0pt;font-family:"Arial","sans-serif";color:black">Network Operations Manager<u></u><u></u></span></p>
<p class="MsoNormal"><b><i><span style="font-size:10.0pt;font-family:"Arial","sans-serif";color:red">Copesan</span></i></b><b><i><span style="font-size:10.0pt;font-family:"Arial","sans-serif";color:black"> - Specialists in Pest Solutions<u></u><u></u></span></i></b></p>
<p class="MsoNormal"><span style="font-size:10.0pt;font-family:"Arial","sans-serif";color:black">800-267-3726 • 262-783-6261 ext. 2296<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-size:10.0pt;font-family:"Arial","sans-serif""><a href="mailto:cstephan@copesan.com" target="_blank"><span style="color:blue">bbaker@copesan.com</span></a><u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-size:10.0pt;font-family:"Arial","sans-serif";color:black"><a href="http://www.copesan.com/" target="_blank"><span style="color:black">www.copesan.com</span></a><u></u><u></u></span></p>
<p class="MsoNormal"><b><i><span style="font-size:10.0pt;font-family:"Arial","sans-serif";color:red">"Servicing North America with Local Care"</span></i></b><u></u><u></u></p>
<p class="MsoNormal"><u></u> <u></u></p>
</div>
</div>
<br>--<br>
RT Training - Boston, September 9-10<br>
<a href="http://bestpractical.com/training" target="_blank">http://bestpractical.com/training</a><br></blockquote></div>