Help for this page
#! perl -slw use strict; ... $byPid{ $pid }{ delta } * 100 / ($totalDelta||1); } }