The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Quiq::System - Information über das System und seine Umgebung

BASE CLASS

Quiq::Object

METHODS

Host

numberOfCpus() - Anzahl der CPUs

Synopsis

  $n = $this->numberOfCpus;

Description

Liefere die Anzahl der CPUs des Systems. Diese Methode ist nicht portabel, sie basiert auf /proc/cpuinfo des Linux-Kernels bzw. dem dem Kommando 'sysctl -n hw.ncpu' von FreeBSD. Im Falle eines unbekannten Systems liefert die Methode 1.

hostname() - Hostname des Systems oder zu IP

Synopsis

  $hostname = $this->hostname;
  $hostname = $this->hostname($ip);

Description

Liefere "den" Hostnamen des Systems. Es ist der Name, den die Methode Sys::Hostname::hostname() liefert.

See Also

Sys::Hostname

ip() - IP des Systems oder zu Hostname

Synopsis

  $ip = $this->ip;
  $ip = $this->ip($hostname);

Description

Liefere die IP-Adresse des Systems (Aufruf ohne Parameter) oder die IP-Adresse für $hostname.

Die IP-Adresse des Systems ist die IP-Adresse zu dem Hostnamen, den Quiq::System->hostname() liefert.

Encoding

encoding() - Character-Encoding der Umgebung

Synopsis

  $encoding = $this->encoding;

Description

Liefere das in der Umgebung eingestellte Character-Encoding. In dieses Encoding sollten Ausgaben auf das Terminal gewandelt werden.

Wir ermitteln das Encoding durch Aufruf der internen Funktion _get_locale_encoding() des Pragmas encoding.

See Also

Pragma encoding

Example

Gib non-ASCII-Zeichen im Encoding der Umgebung auf STDOUT aus:

  my $encoding = Quiq::System->encoding;
  binmode STDOUT,":encoding($encoding)";
  print "äöüßÄÖÜ\n";

User

user() - Benutzername zu User-Id

Synopsis

  $user = $this->user;
  $user = $this->user($uid);

Description

Liefere den Namen des Benutzers mit User-Id (UID) $uid. Ist keine User-Id angegeben, verwende die effektive User-Id des laufenden Prozesses.

uid() - User-Id zu Benutzername

Synopsis

  $uid = $this->uid($user);

Description

Liefere die User-Id (UID) des Benutzers mit dem Namen $user.

Suchpfad

searchProgram() - Suche Programm via PATH

Synopsis

  $path = $class->searchProgram($program);

Options

-sloppy => $bool (Default: 0)

Wirf keine Exception, wenn das Programm nicht gefunden wird, sondern liefere undef.

VERSION

1.178

AUTHOR

Frank Seitz, http://fseitz.de/

COPYRIGHT

Copyright (C) 2020 Frank Seitz

LICENSE

This code is free software; you can redistribute it and/or modify it under the same terms as Perl itself.