... classical testing and quality assurance. 3 In Testing Extreme Programming, Lisa Crispin and Tip House state that “All ac- ceptance tests on an Extreme Programming project must be automated” and ... re- duces quality, which can be difficult to recover from, because the team falls into the bug-fixing trap soon after launch. Too little refactor- ing multiplies defects through copy-and-past...
Ngày tải lên: 05/08/2014, 10:21
... allows us to focus on the important bit: solving the customer’s problem. 9 .3 Team Colors In Extreme Programming Explained, Kent Beck wrote, “The standard must be adopted voluntarily by the whole team.” ... (chr(65) ne ’A’ && ’ in a non-ASCII world’), defined(&Win32::BuildNumber) && defined(Win32::BuildNumber()) ? ’Win32::BuildNumber ’ . Win32::BuildNumber() : (),...
Ngày tải lên: 05/08/2014, 10:21
Extreme Programming in Perl Robert Nagler phần 6 doc
... the average unchanged. These cases are coded as follows: ok(my $ema = EMA->new (3) ); is($ema->compute(1), 1); is($ema->compute(1), 1); The is function from Test::More lets us compare scalar ... rights reserved nagler@extremeperl.org 82 ok(EMA->new (3) ); I sometimes forget to return the instance ($self) so the test calls ok to check that new returns some non-zero value. This case...
Ngày tải lên: 05/08/2014, 10:21
Extreme Programming in Perl Robert Nagler phần 7 pot
... test starts. 13. 5 Validate Basic Assumptions First my($pop3) = Mail::POP3Client->new(HOST => $cfg->{HOST}); $pop 3- & gt;Connect; is($pop 3- & gt;State, ’AUTHORIZATION’); like($pop 3- & gt;Capa, ... $sma = SMA->new(4)); is($sma->compute(5), 5); is($sma->compute(5), 5); is($sma->compute(11), 7); is($sma->compute(11), 8); is($sma->compute( 13) , 10); dies_ok {SMA...
Ngày tải lên: 05/08/2014, 10:21
Extreme Programming in Perl Robert Nagler phần 8 ppsx
... $cfg->{PASSWORD}); is($pop 3- & gt;Login, 0); is($pop 3- & gt;State, ’TRANSACTION’); is($pop 3- & gt;Alive, 1); is($pop 3- & gt;Close, 1); is($pop 3- & gt;Alive, ’’); is($pop 3- & gt;Close, 0); $pop3 = Mail::POP3Client->new; $pop 3- & gt;Connect; Copyright c ... ’DEAD’); is($pop 3- & gt;Alive, ’’); is($pop 3- & gt;Host($cfg->{HOST}), $cfg->{HOST}); is($pop 3- & gt;Host...
Ngày tải lên: 05/08/2014, 10:21
Extreme Programming in Perl Robert Nagler phần 9 pps
... ’LIST’; $CMD=~ tr/a-z/A-Z/; $me->Alive() or return; my @retarray = (); my $ret = ’’; $me->_checkstate(’TRANSACTION’, $CMD) or return; $me->_sockprint($CMD, $num ? " $num" : ’’, $me->EOL()); my ... ’LIST’; $CMD=~ tr/a-z/A-Z/; $me->Alive() or return; my @retarray = (); my $ret = ’’; $me->_checkstate(’TRANSACTION’, $CMD) or return; Copyright c 2004 Robert Nagler All...
Ngày tải lên: 05/08/2014, 10:21