Help for this page

Select Code to Download


  1. or download this
    my @rrds = grep { /.*rrd$/ && -f "$logsdir/$_" } readdir DIR;
    
  2. or download this
            $cmd = qq|$mv resize.rrd $logsdir/$rrd|;
            print "\tRenaming resized file, executing $cmd\n";
            system($cmd) == 0 or die "Could not execute $cmd:$!\n";
    
  3. or download this
            print "\tRenaming resized file, executing $cmd\n";
            rename 'resize.rrd', "$logsdir/$rrd" or die "Could not rename 
    +resize.rrd:$!\n";