Help for this page
perl -le 'print $^O'
package System::CPU; use strict; ... } 1;
my $cpus = System::CPU::nr_cpus;