wok-stable annotate perl-rrd-simple/stuff/usr/bin/rrd_addsource @ rev 5369

rename qt-everywhere* to simple qt4; improve all receipts; tazwok need to work with SOURCE and WANTED (feature not patched for quite long now); improve compile options and add libQtOpenGL back
author Rohit Joshi <jozee@slitaz.org>
date Thu Apr 29 14:42:30 2010 -0400 (2010-04-29)
parents 471df2a3ab20
children
rev   line source
pascal@3577 1 #!/usr/bin/perl
pascal@3577 2
pascal@3577 3 use strict;
pascal@3577 4 use warnings;
pascal@3577 5
pascal@3577 6 use RRD::Simple();
pascal@3577 7
pascal@3583 8 if (@ARGV != 3) {
pascal@3583 9 print "Usage: $0 rrdfile DSname DStype \n";
pascal@3583 10 print "Example: $0 cpu.rrd nice COUNTER \n";
pascal@3582 11 exit;
pascal@3577 12 }
pascal@3577 13
pascal@3577 14 my $file = $ARGV[0];
pascal@3577 15 my $dsname = $ARGV[1];
pascal@3583 16 my $dstype = $ARGV[2];
pascal@3577 17
pascal@3577 18 my $rrd = RRD::Simple->new();
pascal@3577 19
pascal@3583 20 print "Add $dsname:$dstype into $file...";
pascal@3583 21 $rrd->add_source($file, $dsname => $dstype);
pascal@3577 22 print " ok.\n";