[B! Test-More] ishideoã®ãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯

ishideo id:ishideo

Test-Moreã«é–¢ã™ã‚‹ishideoã®ãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯ (12)

${{author_name}}$

{{{comment_expanded}}}

{{label}}

{{#is_bookmark}}ãƒªã‚¹ãƒˆ{{/is_bookmark}}{{^is_bookmark}}ãƒªãƒ³ã‚¯{{/is_bookmark}}

${{author_name}}$
{{author_name}}{{created}}
{{ #comment }}{{ comment }}{{ /comment }}
- {{ label }}

${{author_name}}$

{{{comment_expanded}}}

{{label}}

{{#is_bookmark}}ãƒªã‚¹ãƒˆ{{/is_bookmark}}{{^is_bookmark}}ãƒªãƒ³ã‚¯{{/is_bookmark}}

è¶…ãƒ†ã‚¹ãƒˆå…¥é–€ ã€œ ã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³å¾©ç¿’ã¨require, use - Qiita
ã“ã®è¨˜äº‹ã¯ Perlå…¥å¦å¼ Advent Calendar 2014 ã® 5æ—¥ç›®ã§ã™ã€‚ ã“ã‚“ã«ã¡ã¯ã€‚ã‚µãƒãƒ¼ã‚¿ãƒ¼ã•ã›ã¦ã„ãŸã ã„ã¦ã¾ã™ ã¾ã£ã™ãƒ¼ï¼ˆ@trapple ï¼‰ã§ã™ã€‚ ä»Šæ—¥ã¯æ˜¨æ—¥ã¾ã§ã¨å°‘ã—æµã‚Œã‚’å¤‰ãˆã¦ã€æ™®æ®µã®Perlå…¥å¦å¼ã¨åŒã˜ã‚ˆã†ãªå†…å®¹ã§è¡ŒããŸã„ã¨æ€ã„ã¾ã™ã€‚ ä»Šå¹´ã®Perlå…¥å¦å¼ã®é€²è¡Œå…·åˆã§ã™ã¨ã€ç¬¬4å›žã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³/æ£è¦è¡¨ç¾ãŒçµ‚ã‚ã£ãŸã‚Šçµ‚ã‚ã‚‰ãªã‹ã£ãŸã‚Šãªé€²è¡Œå…·åˆã ã¨æ€ã„ã¾ã™ã€‚ ä»Šå›žã¯ãã®ã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³ã‚’ã¡ã‚‡ã£ã¨ç™ºå±•ã•ã›ãŸå†…å®¹ã«ãªã‚Šã¾ã™ã€‚ ã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³ã¾ã ç¿’ã£ã¦ãªã„ã‚ˆï¼ or å¿˜ã‚Œã¡ã‚ƒã£ãŸã‚ˆï¼ã£ã¦äººã¯ã¾ãšã¯è¬›ç¾©è³‡æ–™ã«ç›®ã‚’é€šã—ã¦ã¿ã¦ãã ã•ã„ã€‚ å¾©ç¿’å•é¡Œ ãã‚Œã§ã¯ç°¡å˜ãªå¾©ç¿’å•é¡Œã‹ã‚‰ã‚¹ã‚¿ãƒ¼ãƒˆã—ã¾ã™ã€‚ mon, tue, wedã¨ã„ã£ãŸ3æ–‡å—è‹±èªžè¡¨è¨˜ã®æ›œæ—¥ã‚’å¼•æ•°ã¨ã—ã¦å—ã‘å–ã‚Šã€æœˆæ›œæ—¥, ç«æ›œæ—¥, æ°´æ›œæ—¥ã¨ã„ã£ãŸæ—¥æœ¬èªž3æ–‡å—è¡¨è¨˜ã®æ›œæ—¥ã‚’è¿”ã™ã‚µãƒ–ãƒ«ãƒ¼ãƒãƒ³translate()ã‚’ä½œã£ã¦ãã ã•ã„ã€‚ æ¨™æº–å…¥
ishideo 2017/01/19
Test-More

perl

test

require
ãƒªãƒ³ã‚¯
GitHub - walf443/php-test-tap: php port of perl's Test::More
ishideo 2016/03/12
php

test

tap

test-more
ãƒªãƒ³ã‚¯
Test Anything Protocol - Wikipedia
This article is about An automated testing protocol. For the network tunnel driver, see TUN/TAP. This article needs additional citations for verification. Please help improve this article by adding citations to reliable sources. Unsourced material may be challenged and removed. Find sources:Â "Test Anything Protocol"Â â€“Â newsÂ Â· newspapersÂ Â· booksÂ Â· scholarÂ Â· JSTOR (October 2017) (Learn how and when t
ishideo 2008/06/12
test

tap

perl

pytap

Test.Simple

Test-More

PHPUnit

test-more.php
ãƒªãƒ³ã‚¯
Test::Moreã®PHPç‰ˆ
è¦‹ã¤ã‘ãŸï¼ã€‚ Chris Shiflett: Test::Simple for PHP ã©ã†ã‚„ã‚‰ã€Apache::Testã®ä¸ã«ã‚ã‚‹ã€TestConfigPHP.pmã®ä¸‹ã®æ–¹ã«æ›¸ã„ã¦ã‚ã‚‹ã‚³ãƒ¼ãƒ‰ã®ã‚ˆã†ã§ã™ã€‚ simpletestã‚„PHPUnitã§ã‚‚ã„ã„ã‚“ã ã‘ã©ã€Perlã‹ã‚‰ãƒ—ãƒã‚°ãƒ©ãƒ ã‚’æ›¸ãå§‹ã‚ãŸåƒ•ã«ã¯ã€ãƒ†ã‚¹ãƒˆã£ã¦ã¨ã¦ã‚‚ç°¡å˜ã«æ›¸ã‘ã‚‹ã¨ã„ã†æ„è˜ãŒã‚ã£ãŸã‚‚ã®ã ã‹ã‚‰ã€æœ€åˆã«ã“ã‚Œã‚‰ã®ã‚„ã‚Šæ–¹ã‚’è¦‹ãŸæ™‚ã¯ãªã‚“ã¦é•·ã€…ã¨æ›¸ã‹ãªãã‚ƒãªã‚‰ã‚“ã®ã ã€‚ã¨æ£ç›´æ€ã£ãŸã€‚ ã©ã†ã›åŒã˜äº‹æ›¸ããªã‚‰ã€çŸãæ¥½ã«æ›¸ã‘ã‚‹æ–¹ãŒå¥½ããªã®ã ã€‚ ã¨ã„ã†ã‚ã‘ã§ã€æ—©é€Ÿä½¿ã£ã¦ã¿ãŸã€‚ ã¾ãšã¯ã€test-more.phpã‚’ãƒ€ã‚¦ãƒ³ãƒãƒ¼ãƒ‰ã€‚ å¾Œã¯ã“ã®ãƒ•ã‚¡ã‚¤ãƒ«ã‚’requireã—ã¦ã‚ã’ã¦ã€ãƒ†ã‚¹ãƒˆã‚’æ›¸ãã ã‘ã€‚ use.php <?php require_once("test_more.php"); plan(1); ok(true, "test"); ?> å¾Œã¯ã€T
ishideo 2007/07/13
php

test

cpan

Test-More
ãƒªãƒ³ã‚¯
Perlã§ã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆæŒ‡å‘ - ç°¡å˜ãªã®ã§ã‚„ã£ã¦ã¿ã¾ã›ã†ã€‚
(Too many spams ... embedded comments are not allowed now, sorry.) 2005-11-25 (Fri) 14:27:42 bless ãŒã‚ã‹ã‚‰ã‚“ã€‚ 2005-11-22 (Tue) 12:55:20 d? : ã“ã“ã‚’è¦‹ã‚‹äººã¯ã€Perlã®ã‚¯ãƒ©ã‚¹ä½œã‚Šæ–¹ãŒã‚ã‹ã‚‰ãªã„äººã§ã—ã‚‡ã†ï¼Ÿ 2005-11-22 (Tue) 12:54:50 d? : ãƒ†ã‚¹ãƒˆãƒ•ã‚¡ãƒ¼ã‚¹ãƒˆè‰¯ã„ã¨æ€ã†ã®ã§ã™ãŒã€ã“ã®ãƒšãƒ¼ã‚¸ã®æœ€åˆã«æ›¸ãã®ã¯é–“é•ã„ã ã¨ãŠã‚‚ã„ã¾ã™ãã€‚ 2005-09-20 (Tue) 14:00:54 ã‚ªãƒ–ã‚¸ã‚§ã‚¯ãƒˆæŒ‡å‘ã®æ¦‚å¿µã¯ãŠè…¹ã„ã£ã±ã„ã§ã™ãŒã€å®Ÿéš›ã«é‹ç”¨å‡ºæ¥ã‚‹ã‹ã¨è¨€ã†ã¨ãƒ»ãƒ»ãƒ—ãƒã‚°ãƒ©ãƒ ã®é–‰ã˜æ–¹ãŒã•ã£ã±ã‚Šã‚ã‹ã‚Šã¾ã›ã‚“ã€‚ã¡ã‚‡ã“ã£ã¨ä½œã£ã¦ãƒ†ã‚¹ãƒˆã¿ãŸã„ãªã®ãŒã€ã•ã£ã±ã‚Šã§ã™ 2005-08-17 (Wed) 11:21:32 ã€Œã‚¯ãƒ©ã‚¹ã¯ã©ã†ã‚„ã£ã¦æ›¸ãã®ï¼Ÿã€ã®ä¸ã«ã€Œã¾ãš
ishideo 2007/05/05
perl

oop

cpan

test

debug

Test-More
ãƒªãƒ³ã‚¯
404 Blog Not Found:ãƒ†ã‚ã‚¹ãƒˆã‚¨ãƒ‡ã‚£ã‚¿ã•ãˆã‚ã‚Œã°ã§ãã‚‹TDD
2006å¹´10æœˆ25æ—¥15:25 ã‚«ãƒ†ã‚´ãƒªLightweight Languages ãƒ†ã‚ã‚¹ãƒˆã‚¨ãƒ‡ã‚£ã‚¿ã•ãˆã‚ã‚Œã°ã§ãã‚‹TDD ãªã‚“ã‹ãˆã‚‰ã„èª¤è§£ã•ã‚Œã¦ã„ã‚‹ã®ã ã‘ã©ã€ç§ã‚‚èˆŒè¶³ã‚‰ãšã ã£ãŸã‹ã‚‚ã—ã‚Œãªã„ã€‚ Perl Testing Ian Langworth / Chromatic ã€ŽWEB+DB PRESS Vol.35ã€:å®Ÿæ¼”! ãƒ†ã‚¹ãƒˆé§†å‹•é–‹ç™º - è§’è°·HTMLåŒ–è¨ˆç”» (2006-10-24)TDDã¯ãƒãƒƒã‚«ãƒ¼ã®ãŸã‚ã®æŠ€è¡“ã§ã¯ãªã„ã€‚ãƒãƒƒã‚«ãƒ¼ã«TDDã¯è¦ã‚‰ãªã„ã€‚ãŸã ãŸã ãƒãƒƒã‚¯ã™ã‚Œã°ã‚ˆã„ã€‚å‰å¤§ãªãƒ—ãƒã‚°ãƒ©ãƒžã¯å‰å¤§ãªãƒ—ãƒã‚°ãƒ©ãƒŸãƒ³ã‚°ã‚’ã™ã‚Œã°ã‚ˆã„ã€‚ã ãŒã€ãƒãƒƒã‚«ãƒ¼ãªã‚‰ã¬å‡¡ç™¾ãŸã‚‹ç§ã®ã‚ˆã†ãª"æ™®é€šã®"ãƒ—ãƒã‚°ãƒ©ãƒžã¯ãã†ã¯ã„ã‹ãªã„ã€‚TDDã¯æˆ‘ã€…ãŒæ—¥ã€…ã®ä»•äº‹ã«è‡ªä¿¡ã‚’æŒã¡ã€èª‡ã‚Šã‚’æŒã£ã¦å®šæ™‚ã«å¸°ã‚‹ãŸã‚ã®æ€æƒ³ã ã€‚ ç§ãŒè¨€ã„ãŸã‹ã£ãŸã®ã¯ã€Test Driven Development (TDD)ã«é–¢ã—ã¦ã¯ã€Javaã‚ˆã‚ŠPerlã‚’
ishideo 2007/04/12
perl

cpan

Test-Base

Test-More

test

dev
ãƒªãƒ³ã‚¯
ãƒ†ã‚¹ãƒˆé§†å‹•ã§ 0 ã‹ã‚‰ 255 ã®æ•°å—ã«ãƒžãƒƒãƒã™ã‚‹æ£è¦è¡¨ç¾ã¸å¤‰å½¢ã—ã¦ã¿ã‚‹ - Tociyuki::Diary
ã¶ãã¾çµŒç”±ã§ã€RFC 3986 URI ã®æ—¥æœ¬èªžè¨³ã«ãŸã©ã‚Šç€ãã€èªã‚“ã§ã„ã¾ã—ãŸã€‚ã‚¹ãƒ ãƒ¼ã‚ºãªæ—¥æœ¬èªžã§ã™ã‚“ãªã‚Šã¨èªã‚ã¦ã€è‰¯ã„è¨³ã ã¨æ€ã„ã¾ã—ãŸã€‚ç§ã¯èª¤è¨³ã‚’è¦‹ã¤ã‘ã‚‰ã‚Œã¾ã›ã‚“ã§ã—ãŸã€‚ ãã‚Œã¯ã¨ã‚‚ã‹ãã€èªã‚“ã§ã„ã‚‹æœ€ä¸ã«ã€RFC3986 ã ã‘ã§ã¯ãªã„ã®ã§ã™ãŒã€IPv4 ã‚¢ãƒ‰ãƒ¬ã‚¹ã®æ•°å—ã«ãƒžãƒƒãƒã™ã‚‹æ§‹æ–‡ãŒã€æ£è¦è¡¨ç¾å‘ã‘ã§ãªã„ã®ã«æ”¹ã‚ã¦æ°—ã«ãªã‚Šã¾ã—ãŸã€‚RFC ã®è¨˜è¿°ã‚’ãã®ã¾ã¾æ£è¦è¡¨ç¾ã«ã™ã‚‹ã¨ã€ãƒãƒƒã‚¯ãƒˆãƒ©ãƒƒã‚¯ã‚’ãŠã“ã™æ›¸ãæ–¹ã«ãªã£ã¦ã„ã¾ã™ã€‚ ãƒãƒƒã‚¯ãƒˆãƒ©ãƒƒã‚¯ãŒãŠããªã„ã‚ˆã†ã«ã™ã‚‹ã«ã¯ã€å…ˆé ã‹ã‚‰1æ–‡å—ãšã¤è¦‹ã¦ã„ãã ã‘ã§æ®‹ã‚Šã®é¸æŠžè‚¢ã®ã©ã‚Œã«é€²ã‚ã°ã„ã„ã‹æ±ºå®šã§ãã‚‹ã‚ˆã†ã«ã™ã‚Œã°ã‚ˆã‚ã—ã„ã€‚ã¨ã„ã†ã“ã¨ã§ã€ã“ã‚Œã‚’ãƒ†ã‚¹ãƒˆé§†å‹•ã§æ£è¦è¡¨ç¾ã«å‘ã„ãŸè¨˜è¿°ã«å¤‰æ›´ã—ã¦ã¿ã¾ã—ãŸã€‚ â‡’ http://www.studyinghttp.net/cgi-bin/rfc.cgi?3986#Sec3.2.2 IPv4address = dec-octet
ishideo 2007/01/30
regex

test

cpan

perl

Test-More
ãƒªãƒ³ã‚¯
warn/die/exceptionã®ãƒ†ã‚¹ãƒˆ
ã—ã°ã‚‰ãèªã‚“ã§ã„ãªã‹ã£ãŸã€ŽPerlTestingã€å†é–‹ã€‚ 2ç« ã®æœ€å¾Œã«å‡ºã¦ãã‚‹wan/die/exceptionã®ãƒ†ã‚¹ãƒˆã€‚ Test::Warn warnã§å‡ºåŠ›ã•ã‚Œã‚‹ãƒ¡ãƒƒã‚»ãƒ¼ã‚¸ã‚’ãƒ†ã‚¹ãƒˆã€‚æ–‡å—åˆ—ç³»ãƒ†ã‚¹ãƒˆãªã®ã§Test::Moreã®isã¨ã‹likeã¨åŒã˜ã‚ˆã†ãªã‚‚ã®ãŒTest::Warnã«ã¯ã‚ã‚Šã¾ã™ã€‚ #!/usr/bin/perl use strict; use warnings; use Test::More tests => 8; use Test::Warn; sub add_positives { my ($l, $r) = @_; warn "first argument ($l) was negative" if $l < 0; warn "second argument ($r) was negative" if $r < 0; return $l + $r; } warning
ishideo 2006/08/30
Test-More

cpan

perl
ãƒªãƒ³ã‚¯
ãƒ†ã‚¹ãƒˆã‚’TODOæ‰±ã„ã«ã™ã‚‹
Test::Moreã§ãƒ†ã‚¹ãƒˆã‚’TODOæ‰±ã„ã«ã™ã‚‹ã“ã¨ãŒå‡ºæ¥ã¾ã™ã€‚ã©ã†ã„ã†ã“ã¨ã‹ã¨ã„ã†ã¨ã€ testè‡ªä½“ã¯æ™®é€šã«è¡Œã†ã€‚ å¤±æ•—ã—ã¦ã‚‚ãã‚Œã¯TODOæ‰±ã„ã¨ã—ã¦ã€ãƒˆãƒ¼ã‚¿ãƒ«ã®çµæžœã§ã¯æˆåŠŸã—ãŸã“ã¨ã«ã™ã‚‹ã€‚ ã¨ã„ã†æ„Ÿã˜ã€‚ ã„ãã¤ã‹ã®æ©Ÿèƒ½ãŒæœªå®Ÿè£…ã®ï¼ˆã¨ã„ã†ã‹ã»ã¨ã‚“ã©ãªã«ã‚‚ã—ã¦ãªã„ï¼‰ã‚·ãƒ£ãƒ¼ãƒšãƒ³ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ï¼ˆæ£ã—ãã¯mechanical pencilã€ã§ã‚‚é•·ã„ã‹ã‚‰å«Œï¼‰ãŒã‚ã‚‹ã¨ã—ã¾ã™ã€‚ package Pencil; use strict; use warnings; sub new { my $class = shift; return bless {}, $class; } sub leads { # TODO } sub supply_leads { # TODO } 1; #!/usr/bin/perl use strict; use warnings; use Test::More tests => 3
ishideo 2006/08/30
Test-More

cpan

perl
ãƒªãƒ³ã‚¯
ãƒ†ã‚¹ãƒˆã‚’ã‚¹ã‚ãƒƒãƒ—ã™ã‚‹
æ•°æ—¥é–“ãŒç©ºã„ãŸã‘ã©ã€PerlTestingå†é–‹ã€‚ æ¡ä»¶ã«åˆã‚ã›ã¦ãƒ†ã‚¹ãƒˆã‚’ã‚¹ã‚ãƒƒãƒ—ã—ãŸã„å ´åˆãŒã‚ã£ãŸã‚Šã—ã¾ã™ã€‚ãŸã¨ãˆã°ã€ ä¾å˜ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ãŒã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«ã•ã‚Œã¦ãªã‹ã£ãŸã‚‰ã‚¹ã‚ãƒƒãƒ— ã¨ã‚ã‚‹OSã ã£ãŸã‚‰ã‚¹ã‚ãƒƒãƒ— ãƒãƒƒãƒˆãƒ¯ãƒ¼ã‚¯ã«ã¤ãªãŒã£ã¦ãªã‹ã£ãŸã‚‰ã‚¹ã‚ãƒƒãƒ— ãªã©ãªã©ã€‚ãã†ã„ã†æ™‚ã¯skipé–¢æ•°ã‚’ä½¿ã„ã¾ã™ã€‚ ãƒ†ã‚¹ãƒˆã™ã‚‹ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã€‚ package Phrase; use strict; use warnings; sub new { my ($class, $text) = @_; bless \$text, $class; } sub text { my $self = shift; return $$self; } sub as_dutch { my $self = shift; require WWW::Babelfish; return WWW::Babelfish->new->translate
ishideo 2006/08/30
Test-More

cpan

perl
ãƒªãƒ³ã‚¯
ã‚‚ã£ã¨ä¾¿åˆ©ãªok()
PerlTestingã®Chapter1æœ€çµ‚æˆ¦ã§ã™ã€‚ ok()ã£ã¦åŸºæœ¬ä¸ã®åŸºæœ¬ã§ã™ãŒã‚„ã£ã±ã‚Šä¸ä¾¿ã§ã™ã€‚ã„ã‚ã‚“ãªãƒ†ã‚¹ãƒˆãŒã‚ã‚‹ã®ã«æ¡ä»¶ã‚’1å€‹ã«ç¸®ã‚ãªã„ã¨ã„ã‘ãªã„ã‚“ã§ã™ã‚‚ã®ã€‚ã§ã‚‚ã€Test::Moreã«ã¯ok()ã®ä»£ã‚ã‚Šã«ä½¿ãˆã‚‹ã‚¤ã‚±ã¦ã‚‹é–¢æ•°ãŒã„ãã¤ã‹ã‚ã‚Šã¾ã™ã€‚ ã¾ãšã¯ãƒ†ã‚¹ãƒˆã‚³ãƒ¼ãƒ‰ã€‚ #!/usr/bin/perl use strict; use warnings; use Test::More tests => 4; use_ok('Greeter') or exit; my $greeter = Greeter->new(name => 'Emily', age => 21); isa_ok($greeter, 'Greeter'); is($greeter->age(), 21, 'age() should return age for object'); like($greeter->gr
ishideo 2006/08/30
Test-More

cpan

perl
ãƒªãƒ³ã‚¯
ã¯ã˜ã‚ã¦ã®Test::More
Chapter1ã®å¾ŒåŠæˆ¦ã¯ã€Test::Moreã€‚ Perl Testing: A Developer's Notebook (Developers Notebook) Test::Moreã¯Test::Simpleã®ã‚¹ãƒ¼ãƒ‘ãƒ¼ã‚»ãƒƒãƒˆã§å®Œå…¨ã«ç½®ãæ›ãˆã¦ä½¿ã£ã¦OKã€ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’ãŸã ã—ãèªã¿è¾¼ã‚ãŸã‹ã©ã†ã‹ãªã©ã®ãƒ†ã‚¹ãƒˆé–¢æ•°ã‚‚å«ã‚ã„ã‚ã‚“ãªæ©Ÿèƒ½ã‚ã‚‹ã§ã‚ˆã€ã¨ã®ã“ã¨ã§ã™ã€‚ æ—©é€Ÿã€‚ package AnalyzeSentence; use strict; use warnings; use base qw/Exporter/; our $WORD_SEPARATOR = qr/\s+/; our @EXPORT_OK = qw($WORD_SEPARATOR count_words words); sub words { my $sentence = shift; return split $WORD_SE
ishideo 2006/08/30
Test-More

cpan

perl
ãƒªãƒ³ã‚¯
1