in reply to Re^2: Monitoring mysql tables in perl
in thread Monitoring mysql tables in perl
-
i just want to be able to store these values in a csv format, so i can render it in a graph.
Rendering an array of data into a CSV row is fairly simple. Here's one example:
There are many many other ways of doing this but there is one way.#!/usr/bin/perl use strict; my $data = [ [ qw/ a b c d /], [ qw/ e f g h /], [ qw/ i j k l /] ]; my $outfile = "/path/to/my/file.csv"; open FOUT,"> $outfile" or die "$outfile: $!"; foreach my $row (@$data){ printf FOUT "%s\n',join(",",@$row); } close FOUT;
Peter L. Berghold -- Unix Professional
Peter -at- Berghold -dot- Net; AOL IM redcowdawg Yahoo IM: blue_cowdawg
In Section
Seekers of Perl Wisdom