pl: Perl & LWP::UserAgent & Cookie setzen

Beitrag lesen

Wenn Du also alles, das Nachladen der Abhängigkeit, die Injection und die Funktionalität zusammen prüfen willst, sieht das so aus:

# Instanz der Klasse Mock erstellen
my $mock = bless{}; 

# setze einen definierten Parameter
$ENV{QUERY_STRING} = q(mock=123);

# die zu prüfende Methode parst den Parameter aus %ENV
print $mock->param('mock'); # 123

Da eine außenstehende Methode erst kompiliert werden muss, definiert die Klasse Mock eine AUTOLOAD Methode und den Pfad zum Factory-Verzeichnis.