• Home
  • History
  • Annotate
Name Date Size #Lines LOC

..03-May-2022-

Processors/H04-Sep-2017-827

t/H04-Sep-2017-13672

.gitignoreH A D10-May-2012100 1312

COPYINGH A D04-May-20098.9 KiB198154

ChangesH A D04-Sep-20173 KiB12466

MANIFESTH A D14-Nov-2015200 1817

MANIFEST.SKIPH A D14-Nov-2015146 1716

META.ymlH A D04-Sep-2017511 2119

Makefile.PLH A D26-Apr-20171.8 KiB7753

Processors.pmH A D04-Sep-20173.2 KiB12430

Processors.xsH A D04-Sep-201719.9 KiB794692

READMEH A D26-Apr-20172.1 KiB8653

readme.texiH A D26-Apr-20172.8 KiB10677

typemapH A D21-Nov-2006275 1210

README

11 Unix::Processors
2******************
3
4This is the Unix::Processors Perl Package.
5
61.1 Copyright
7=============
8
9This package is Copyright 1999-2017 by Wilson Snyder
10<wsnyder@wsnyder.org>.
11
12   This program is free software; you can redistribute it and/or modify
13it under the terms of either the GNU Lesser General Public License
14Version 3 or the Perl Artistic License Version 2.0.
15
16   This code is provided with no warranty of any kind, and is used
17entirely at your own risk.
18
191.2 Description
20===============
21
22This package provides access to per-processor information from Perl.
23
24       my $procs = new Unix::Processors;
25       print $procs->max_online, " CPUs at ", $procs->max_clock, " MHz\n";
26       if ($procs->max_online != $procs->max_physical) {
27           print "Hyperthreading between ",$procs->max_physical," physical CPUs.\n";
28       }
29       (my $FORMAT =   "%2s  %-8s     %4s    \n") =~ s/\s\s+/ /g;
30       printf($FORMAT, "#", "STATE", "CLOCK",  "TYPE", );
31       foreach my $proc (@{$procs->processors}) {
32           printf ($FORMAT, $proc->id, $proc->state, $proc->clock, $proc->type);
33       }
34
35   See `man Unix::Processors' after installation.
36
371.3 Obtaining Distribution
38==========================
39
40The latest version is available at `http://www.perl.org/CPAN/'
41
42   Download the latest package from that site, and decompress.  `gunzip
43Unix-Processors_version.tar.gz ; tar xvf Unix-Processors_version.tar'
44
451.4 Supported Systems
46=====================
47
48This version of Unix::Processors has been built and tested on:
49
50   * i386-linux
51
52   * aix-4.3.3
53
54   * aix-5.1.0 (32 and 64 bit)
55
56   * alpha-osf
57
58   * freebsd (clock methods not supported before freebsd 5.4)
59
60   * hpux-11.00
61
62   * hpux-11.11
63
64   * sgi-irix
65
66   * sparc-sun-solaris2.6
67
68   * sparc-sun-solaris2.8
69
70   Porting will definately be necessary for other operating systems.
71
721.5 Installation
73================
74
75  1. `cd' to the directory containing this README notice.
76
77  2. Type `perl Makefile.PL' to configure Unix::Processors for your
78     system.
79
80  3. Type `make' to compile Unix::Processors.
81
82  4. Type `make install' to install the programs and any data files and
83     documentation.
84
85
86

readme.texi

1\input texinfo @c -*-texinfo-*-
2@c %**start of header
3@setfilename readme.info
4@settitle Perl Unix::Processors Installation
5@c %**end of header
6
7@c DESCRIPTION: TexInfo: DOCUMENT source run through texinfo to produce README file
8@c Use 'make README' to produce the output file
9@c Before release, run C-u C-c C-u C-a (texinfo-all-menus-update)
10
11@node Top, Copyright, (dir), (dir)
12@chapter Unix::Processors
13
14This is the Unix::Processors Perl Package.
15
16@menu
17* Copyright::
18* Description::
19* Obtaining Distribution::
20* Supported Systems::
21* Installation::
22@end menu
23
24@node Copyright, Description, Top, Top
25@section Copyright
26
27This package is Copyright 1999-2017 by Wilson Snyder @email{wsnyder@@wsnyder.org}.
28
29This program is free software; you can redistribute it and/or modify
30it under the terms of either the GNU Lesser General Public License
31Version 3 or the Perl Artistic License Version 2.0.
32
33This code is provided with no warranty of any kind, and is used entirely at
34your own risk.
35
36@node Description, Obtaining Distribution, Copyright, Top
37@section Description
38
39This package provides access to per-processor information from Perl.
40
41@example
42  my $procs = new Unix::Processors;
43  print $procs->max_online, " CPUs at ", $procs->max_clock, " MHz\n";
44  if ($procs->max_online != $procs->max_physical) @{
45      print "Hyperthreading between ",$procs->max_physical," physical CPUs.\n";
46  @}
47  (my $FORMAT =   "%2s  %-8s     %4s    \n") =~ s/\s\s+/ /g;
48  printf($FORMAT, "#", "STATE", "CLOCK",  "TYPE", );
49  foreach my $proc (@@@{$procs->processors@}) @{
50      printf ($FORMAT, $proc->id, $proc->state, $proc->clock, $proc->type);
51  @}
52@end example
53
54See @samp{man Unix::Processors} after installation.
55
56@node Obtaining Distribution, Supported Systems, Description, Top
57@section Obtaining Distribution
58
59The latest version is available at
60@uref{http://www.perl.org/CPAN/}
61
62Download the latest package from that site, and decompress.
63@samp{gunzip Unix-Processors_version.tar.gz ; tar xvf Unix-Processors_version.tar}
64
65@node Supported Systems, Installation, Obtaining Distribution, Top
66@section Supported Systems
67
68This version of Unix::Processors has been built and tested on:
69
70@itemize @bullet
71@item i386-linux
72@item aix-4.3.3
73@item aix-5.1.0 (32 and 64 bit)
74@item alpha-osf
75@item freebsd (clock methods not supported before freebsd 5.4)
76@item hpux-11.00
77@item hpux-11.11
78@item sgi-irix
79@item sparc-sun-solaris2.6
80@item sparc-sun-solaris2.8
81@end itemize
82
83Porting will definately be necessary for other operating systems.
84
85@node Installation,  , Supported Systems, Top
86@section Installation
87
88@enumerate
89@item
90@code{cd} to the directory containing this README notice.
91
92@item
93Type @samp{perl Makefile.PL} to configure Unix::Processors for your system.
94
95@item
96Type @samp{make} to compile Unix::Processors.
97
98@item
99Type @samp{make install} to install the programs and any data files and
100documentation.
101
102@end enumerate
103
104
105
106