in reply to Re^2: DBD:Pg getting output in an array
in thread DBD:Pg getting output in an array

Try 
my $labels = [];
my $data = [];
while (my $ref = $sth->fetchrow_hashref()) { 
  push @$labels,$ref->{'Labels'}; 
  push @$data,$ref->{'Data'}; 
}

[download]
poj

Replies are listed 'Best First'.
Re^4: DBD:Pg getting output in an array
by terrykhatri (Acolyte) on Jul 27, 2014 at 21:30 UTC
    Thanks Poj, its 
    my $labels = []; 
my $data = []; 
 
while (my @row = $sth->fetchrow_array) { 
    push @$labels, $row[0];  
    push @$data, $row[1];  
}

    [download]
    Rgds. Terry
[reply]
[d/l]

In Section Seekers of Perl Wisdom