Perl & LWP::UserAgent & Cookie setzen

[pl]

OK, ich formuliere die Frage anders: Ist das benutzte CGI-Modul das CGI.pm oder dein eigenes?

Ich verstehe die Frage nicht. Das hier gezeigte Beispiel:

    use CGI;
    my $main = bless{
        CGI => CGI->new()
    }, 'main';

    # Delegiere die gleichnamige Methode
    sub param{
        my $self = shift;
        return $self->{CGI}->param(@_);
    }

    # das wird damit möglich
    $main->param('foo');

benutzt überhaupt kein Modul sondern macht Aggregation/Delegation anschaulich. D.h. anstelle CGI.pm kann jedes andere Modul gesetzt werden, das Beispiel ist davon völlig unabhängig.

Selbstverständlich jedoch funktioniert das Beispiel sowohl mit CGI.pm als auch mit xCGI.pm (meiner Eigenentwicklung), falls das die Frage war.

MfG