Wie Test-Methode richtig testen? - #189712 (Allgemeines zu Perl)

renee

2019-02-04 15:24

User since
2003-08-04
14371 Artikel
ModeratorIn

Ich würde das Starten des Kommandos und das Einlesen des Outputs in eine extra Sub auslagern. Dann hast Du zwei Subs, die man einfacher testen kann.

Gibt es einen Grund, warum Du nicht z.B. CPAN:

Capture::Tiny nimmst?

Code: (dl )

sub command_output ( ... ) {
    subtest $test_name => sub {
        my $output = _run_command( $command, $args );

        return subtest ... if 'CODE' eq ref $test;
        return like ... if 'Regexp' eq ref $test;
        return is ...;
    };
}

sub _run_command ( $command, $args ) {
    # start command and retrieve output
    return $output
}

Dann kann man zum Testen von command_output einfach die _run_command überschreiben und hat immer feste Ausgaben die man testet.

Und man kann das _run_command besser testen.

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/