Hi, Many thanks for your code. I cheeked your code. it gives below output to my web browser $VAR1 = bless( [ 'Cleaned', 'Spam', 'Virus', 'Banned', 'BadHeader', 'Rejected' , '10 ', '36 ', '0 ', '0 ', '0 ', '975 ' ], 'GD::Graph::Data' );

Then, I wrote another code by manually adding data to it in this ways

 
#!/usr/bin/perl
use strict;
use warnings;

use CGI qw(:standard);
use CGI::Carp 'fatalsToBrowser'; # only use for testing
use GD::Graph;
use Data::Dumper;
 
my $clean_total  = qx(sudo grep -Ec 'amavis.*Passed CLEAN' /var/log/ma
+illog);
my $spam_total   = qx(sudo grep -Ec 'amavis.*Blocked SPAM' /var/log/ma
+illog);
my $virus_total  = qx(sudo grep -Ec 'amavis.*Blocked INFECTED' /var/lo
+g/maillog);
my $banned_total = qx(sudo grep -Ec 'amavis.*Blocked BANNED' /var/log/
+maillog); 
my $badheader_total = qx(sudo grep -Ec 'amavis.*BAD-HEADER-' /var/log/
+maillog);
my $reject_total = qx(sudo grep -c 'reject' /var/log/maillog); 

my $data = GD::Graph::Data->new([
    ["Cleaned","Spam","Virus","Banned","BadHeader","Rejected"],
    [10, 36, 0, 0, 0, 974],
]) or die GD::Graph::Data->error; 

print header('text/plain');
print Dumper $data;

[download]

Then, it gives below output to my web browser

$VAR1 = bless( [ 'Cleaned', 'Spam', 'Virus', 'Banned', 'BadHeader', 'Rejected' , 10, 36, 0, 0, 0, 974 ], 'GD::Graph::Data' );

The above works as expected. But I need to go with variables. Could you pls help me to write my grep results with variables properly? I tried but I still can't get it done? I think I will have to avoid line break..

In reply to Re^2: problem with show_values => 1, while drawing a bar graph with variables by theravadamonk
in thread problem with show_values => 1, while drawing a bar graph with variables by theravadamonk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.