Threaded Mode | Linear Mode

***Back_track*** · 06-24-2010, 03:14 PM

Code:

use Sys::CPU;

  $number_of_cpus = Sys::CPU::cpu_count();

  printf("I have %d CPU's\n",$number_of_cpus);

  print "  Speed : ",Sys::CPU::cpu_clock(),"\n";

  print "  Type  : ",Sys::CPU::cpu_type(),"\n";

http://search.cpan.org/~mzsanford/Sys-CPU-0.45/CPU.pm

***drdebcol*** · 06-24-2010, 03:27 PM

This can be used for some computer-info programs. I know how to do it in Delphi. If you collect tricks and find ways to extract data from the computer about it's hardware,
you can make a program like Everest Ultimate or something like that !