Jenkins はじめました + ほか3つ - mixi engineer blog
こんにちは。加藤和良です。 まずあの話を書いて、それを前提にあの話を書いて、みたいなキューが筆者の中にはあったのですが、正直キューの先端につまってる話はだんだん個人的な関心および記憶がうすれてきました! 昔のはなしですからね。 というわけで、最近のまとめをさらっと書いて、新しいネタをすぐ書ける状態にリセットしたいと思います。 Jenkins mixi ではバージョン管理システムとして Subversion を使っています。安定した、いつでもリリースできるバージョンを trunk に、開発中の機能は branches 以下に作業ブランチをつくり、レビューや QA などの後に trunk にマージする、という運用です。 Buildbot はこのうち trunk だけを追っていたのですが、徐々に「このブランチも Buildbot で追うようにして、結果をこの IRC チャンネルに書きこんでほしい
Kazuho@Cybozu Labs: Perl のテスト用に MySQL 環境を自動で構築するモジュール Test::mysqld を書いた
ORM やウェブアプリケーション関連のライブラリなどのテストケースを書くにあたっては、 RDBMS へのアクセスが必要になります。しかし、SQLite のようなスタンドアローンのデータベースと比較すると、サーバ型データベースである MySQL に接続してテストを書くのは、既存の MySQL の権限設定やデータベース名を気にする必要があったりと、いろいろ不便です。そこで、MySQL のインスタンスをテンポラリディレクトリに自動生成し、テストが終わったら削除してくれる Perl モジュール Test::mysqld を書きました。こんな感じで使います。 use DBI; use Test::mysqld; use Test::More; my $mysqld = Test::mysqld->new( my_cnf => { 'skip-networking' => '' }, # TCP接続を
第1回 Perlにおけるテストの概要／TAPとは？ | gihyo.jp
モバイルファクトリーの松野です。 今回から数回にわたって、Perl におけるテスト手法についてリレー形式で詳細に解説していきたいとおもいます。 今回は初回ですので、ざっくりと概論になります。 Perlの世界におけるテストの重要性 Perlの世界においてはテスト（test）は大変重要視されています。 その特徴がよく表れているのがCPAN Testersではないでしょうか。 CPAN Testers Perlといえば何はなくともCPANなわけですが、CPANでモジュールを探していると、図1のように、「CPAN Testers」という項目があることに気付きます。 図1 CPAN Testers 世界中のPerl Mongersが、自分のマシンでテストを動かして、その結果をCPANに送っているのです。これにより、様々なOS／CPU／versionのPerlでテストがされています。貴方も気軽にCP
Test::Base
NAME Test::Base - A Data Driven Testing Framework SYNOPSIS A new test module: # lib/MyProject/Test.pm package MyProject::Test; use Test::Base -Base; use MyProject; package MyProject::Test::Filter; use Test::Base::Filter -base; sub my_filter { return MyProject->do_something(shift); } A sample test: # t/sample.t use MyProject::Test; plan tests => 1 * blocks; run_is input => 'expected'; sub local_fil
複雑な構造のデータをテストする
まだ、『PerlTesting』はChapter 2。 今までやってきたテストは、単純なスカラー値のテストと関数のテストのみですが、もっと複雑なデータをテストしたい場合があります。 Test::More::is_deeply :is_deeply:リファレンスを追いかけて複雑な構造のデータを比較して同じかどうかテストする たとえば、リスト＞ハッシュ＞スカラー、リストのテスト。 #!/usr/bin/perl use strict; use warnings; use Test::More tests => 1; my $list1 = [ { name => 'Tom' family => [qw/father mother dog/], }, { name => 'Bob', family => [qw/father mother sister cat/], } ]; my $list2
Test::More - テストを書くためのもう一つのフレームワーク - perldoc.jp
名前¶ Test::More - テストを書くためのもう一つのフレームワーク 概要¶ use Test::More tests => $Num_Tests; # または use Test::More qw(no_plan); # または use Test::More skip_all => $reason; BEGIN { use_ok( 'Some::Module' ); } require_ok( 'Some::Module' ); # 「ok」と示すためのさまざまな方法 ok($this eq $that, $test_name); is ($this, $that, $test_name); isnt($this, $that, $test_name); # STDERR に出力するよりも "# here's what went wrong\n" diag("here's what
Test::WWW::Mechanize - テスト用 WWW::Mechanize サブクラス
名前 Test::WWW::Mechanize - テスト用 WWW::Mechanize サブクラス バージョン Version 1.12 概要 Test::WWW::Mechanize はウェブアプリケーションをテストする 機能を取り入れた WWW::Mechanize のサブクラスです. 例: $mech->get_ok( $page ); $mech->base_is( 'http://petdance.com/', 'Proper <BASE HREF>' ); $mech->title_is( "Invoice Status", "Make sure we're on the invoice page" ); $mech->content_contains( "Andy Lester", "My name somewhere" ); $mech->content_like( q
Test::WWW::Mechanize
NAME Test::WWW::Mechanize - Testing-specific WWW::Mechanize subclass VERSION Version 1.60 SYNOPSIS Test::WWW::Mechanize is a subclass of WWW::Mechanize that incorporates features for web application testing. For example: use Test::More tests => 5; use Test::WWW::Mechanize; my $mech = Test::WWW::Mechanize->new; $mech->get_ok( $page ); $mech->base_is( 'http://petdance.com/', 'Proper <BASE HREF>' );
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
403 Forbidden
Test::LongString - tests strings for equality, with more helpful failures - metacpan.org