Programmieren mit Perl

English

use English;

# Verwendung von durch awk bekannten Namen.
$RS='';                     #statt $/
while (<>) {
    next if $NR < 10;    # statt $.
    ...
}

# Das gleiche, diesmal aber eher an COBOL angelehnt.
$INPUT_RECORD_SEPARATOR = '';
while (<>) {
    next if $INPUT_LINE_NUMBER < 10;
    ...
}

Das English-Modul stellt umständliche Aliases für die eingebauten Variablen bereit. Es eignet sich für geübte Schreiber mit einer ausgeprägten Abneigung gegen nichtalphabetische Identifier (und einer ausgeprägten Vorliebe für die Hochstelltaste). Wie bei allen Importen sind diese Aliases nur im aktuellen Paket verfügbar. Die Variablen sind unter ihren eigentlichen Namen immer noch zugänglich. Sobald Sie dieses Modul mit use eingebunden haben, können Sie $PID verwenden, wenn $$ Sie stört, ...