Programmieren mit Perl

use re

Dieses Pragma steuert die Verwendung regulärer Ausdrücke. Es gibt vier mögliche Formen des Aufrufs: "taint" und "eval", die lexikalisch beschränkt sind, sowie "debug" und "debugcolor", für die das nicht gilt.

use re 'taint';
# Inhalt von $match unterliegt dem Tainting,wenn auch $dirty dem
# Tainting unterliegt.
($match) = ($dirty =~ /^(.*)$/s);

# Codeinterpolation erlauben:
use re 'eval';
$pat = '(?{ $var = 1 })';      # eingebettete Ausführung von Code
/alpha${pat}omega/;            # kein Fehler,es sei denn, -T ist aktiv
                               #     und $pat unterliegt dem Tainting

use re 'debug';                # wie "perl -Dr"
/^(.*)$/s;                     # Ausgabe von Debugging-Informationen während
                               #     der Kompilierung und zur Laufzeit

use re 'debugcolor';           # wie 'debug',
                               #     aber mit farbiger Ausgabe

Ist use re ...