Jakub Narebski <jnareb@xxxxxxxxx> writes: >> +# loadavg throttle >> +sub get_loadavg() { >> + my $load; >> + my @loads; >> + >> + open($load, '<', '/proc/loadavg') or return 0; > > Why not use one of existing CPAN modules: Sys::Info::Device::CPU, > BSD::getloadavg, Sys::CpuLoad? I would prefer to hear something along the lines of... I like this. Here is a follow-up patch you can squash in to support other platforms. I gave the patches a cursory look (I somehow didn't see 5/6, though) and they all looked decently done, except that some of the lines were excessively long. -- To unsubscribe from this list: send the line "unsubscribe git" in the body of a message to majordomo@xxxxxxxxxxxxxxx More majordomo info at http://vger.kernel.org/majordomo-info.html