O'Reilly logo

Programmieren mit Perl by Jon Orwant, Tom Christiansen, Larry Wall

Stay ahead with the world's most comprehensive technology and business learning platform.

With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, tutorials, and more.

Start Free Trial

No credit card required

POSIX

use POSIX;

# Auf- oder abrunden von Floats zum nächsten Integerwert.
$n = ceil($n);     # Aufrunden.
$n = floor($n);    # Abrunden.

# Erzeugt "2000-04-01" für den heutigen Tag.
$datestr = strftime("%Y-%m-%d", localtime);

# Erzeugt "Saturday 04/01/00" für das gleiche Datum.
$datestr = strftime("%A %D", localtime);

# Probiert neue temporäre Dateinamen aus, bis wir einen erhalten, der noch
# nicht existiert. Siehe auch File::Temp im CPANoder in v5.6.1.
do {
    $name = tmpnam();
} until sysopen(FH, $name, O_CREAT|O_EXCL|O_RDWR, 0666);
# Prüfen, ob das System ein unsicheres chown besitzt. if (sysconf(_PC_CHOWN_RESTRICTED)) { print "Hurra --- nur der Superuser darf chown aufrufen\n"; } # uname-Info des aktuellen Systems ermitteln. my($kemel, $hostname, $release, ...

With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, interactive tutorials, and more.

Start Free Trial

No credit card required