Connaitre la charge du système

C'est le module Sys::CpuLoad qui retourne un tableau dont les trois premiers éléments sont le loadavg sur 1, 5 et 15 minutes.

use Sys::CpuLoad;

print '1 min, 5 min, 15 min load average: '.
            join(',', Sys::CpuLoad::load()). "\n";

Le module Sys::Load propose également une fonction en tous points identique.