Teste :: Resub. Test :: Resub é uma substituição de sub-rotina lexicais para testes.
Baixe Agora

Teste :: Resub. Classificação e resumo

Teste :: Resub. Tag

Módulo Perl. lexical sub-rotina sub-rotina lexical. Teste de sub-rotina

Teste :: Resub. Descrição

Test :: Resub é uma substituição sub-rotina de sub-rotina lexically para testes. Teste :: resub é uma substituição de sub-rotina lexically escopo para testes.Synopsis #! / USR / BIN / Perl Use teste :: Mais testes => 4; Use teste :: resub qw (resub); {pacote em algum lugar; Sub Mostrar {My ($ Class, $ Message) = @_; return "$ classe, $ mensagem"; }} # sanidade é (em algum lugar-> show ('além do mar'), 'em algum lugar, além do mar'); # substituição de sub-rotina de sub-rotina com argumento capturando {my $ rs = resub 'em algum lugar :: show', sub {'Hi'}, captura => 1; é (em algum lugar-> show ('Over the Rainbow'), 'Hi'); is_deeply ($ rs-> method_args, ]); } # Único termina, resubo é embora, o código original retornos é (em algum lugar-> show ('esperando por mim'), 'em algum lugar, esperando por mim'); este módulo permite substituir temporariamente uma sub-rotina / método por código arbitrário. Mais tarde, você pode dizer quantas vezes foi chamado e com quais argumentos a cada vez. Você também pode especificar que o sub-rotina / método deve ser chamado, não deve ser chamado ou pode ser opcionalmente chamado. Requisitos: · Perl.

Teste :: Resub. Software Relacionado