| Å×½ºÆ® :: Tester :: CapturerUnner. Å×½ºÆ® :: Tester :: CapturerUnner´Â Test :: Builder·Î ±¸Ãà µÈ µµ¿ò¸» Å×½ºÆ® ¸ðµâÀ» Á¦°øÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
Å×½ºÆ® :: Tester :: CapturerUnner. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~fdaly/Test-NoWarnings-0.084/lib/Test/NoWarnings.pm
Å×½ºÆ® :: Tester :: CapturerUnner. ű×
Å×½ºÆ® :: Tester :: CapturerUnner. ¼³¸í
Test :: Tester :: CapturerUnner´Â Test :: Builder·Î ±¸Ãà µÈ µµ¿ò¸» Å×½ºÆ® ¸ðµâÀ» Á¦°øÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. Test :: Tester :: CapturerUnner Å×½ºÆ® Å×½ºÆ® Å×½ºÆ® Å×½ºÆ® ¸ðµâÀ» Á¦°øÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. :: Builder.Synopsis »ç¿ë Å×½ºÆ® :: Å×½ºÅÍ Å×½ºÆ® => 6; Å×½ºÆ® :: mystyle; check_test (sub {is_mystyle_eq ( "this", "this", "eq", "not eq");} {ok => 0, #ÀÌ ¹®Á¦°¡ ½ÇÆÐÇÑ À̸§ => "eq", diag => "¿¹»ó : 'ÀÌ' ngot : '±×', ',}); ¶Ç´Â Å×½ºÆ® :: Å×½ºÅÍ »ç¿ë; Å×½ºÆ® :: ´õ ¸¹Àº Å×½ºÆ® => 3; Å×½ºÆ® :: mystyle; my @results = run_tests (sub {is_database_alive ( "dbname);}, {ok => 1, # Å×½ºÆ®°¡ Àü´Þ µÉ °ÍÀ¸·Î ¿¹»ó}). # ÀÌÁ¦ Å×½ºÆ® :: ±âŸ :: ($ RETERT -> DIAG}, "/ ^ µ¥ÀÌÅͺ£À̽º ÇÎ (diag},"/ ^ µ¥ÀÌÅͺ£À̽º Ping "/,"Diag "); ¿ä±¸ »çÇ× : ¡¤ Perl ¿ä±¸ »çÇ× : ¡¤ Perl.
Å×½ºÆ® :: Tester :: CapturerUnner. °ü·Ã ¼ÒÇÁÆ®¿þ¾î