<html><head><style type="text/css"><!-- DIV {margin:0px;} --></style></head><body><div style="font-family:times new roman,new york,times,serif;font-size:12pt;color:#0000bf;"><div>Hi everybody<br><br>I am sorry if I am posting on the wrong list, I am writing a perl script (beginner level) and I believe that this is the right place to ask my question.<br>If I am wrong please let me know and I will ask on the other lists.<br><br>Here is the code I am using<br><br><br>use RRDs;<br>@DataSources=('input','output','memory','CPU');<br>for ($i=0; $i<$#DataSources+1; $i=$i+1)<br> {<br> $DS=($DS.'"DS:'.$DataSources[$i].':GAUGE:6300:0:100000",');<br> }<br>$string='"databse.rrd",'.$DS.'"RRA:AVERAGE:0.5:120:360"';<br>RRDs::create ($string);<br>my $error = RRDs::error;<br>warn "ERROR: $error\n" if $error;<br><br>In the end, before creating the database, $string has the value:
"database.rrd","DS:input:GAUGE:6300:0:100000","DS:output:GAUGE:6300:0:100000","DS:memory:GAUGE:6300:0:100000","DS:CPU:GAUGE:6300:0:100000","RRA:AVERAGE:0.5:120:360"<br>and I receive this error: "ERROR: you must define at least one Round Robin Archive"<br><br>If I use<br><br><br>use RRDs;<br>RRDs::create ("databse.rrd","DS:input:GAUGE:6300:0:100000","DS:output:GAUGE:6300:0:100000","DS:memory:GAUGE:6300:0:100000","DS:CPU:GAUGE:6300:0:100000","RRA:AVERAGE:0.5:120:360");<br>my $error = RRDs::error;<br>warn "ERROR: $error\n" if $error;<br><br>I just used the string instead of creating it like in the first example and now I am not receiving any errors and the file is created.<br><br>What am I doing wrong??<br><br>Thank you <br>PF<br><br><br></div>
<!-- cg33.c3.mail.sp2.yahoo.com compressed/chunked Wed Jan 6 21:31:34 PST 2010 -->
</div><br>
<hr size=1>Instant message from any web browser! Try the new <a href="http://ca.messenger.yahoo.com/webmessengerpromo.php"><b> Yahoo! Canada Messenger for the Web BETA</b></a></body></html>