Help for this page

Select Code to Download


  1. or download this
    #!perl

...
"Test::More",
"Sys::Info::Driver::Unknown",
"Sys::Info::Driver::Windows::OS");
  2. or download this
    #!perl

...
my $info = Sys::Info->new;
my $cpu = $info->device( 'CPU' );
printf "%s(%s bit)\n", scalar $cpu->identify, $cpu->bitness;