はじめてのTest::Simpleテスト本が届いたのでテストをしてみるテスト。勉強日記の公開テストもかねて。 Perl Testing: A Developer's Notebook (Developers Notebook) Test::Simpleはじめの一歩 #!/usr/bin/perl use strict; use warnings; use Test::Simple tests => 1; sub hello_world { return "Hello, world!"; } ok(hello_world() eq "Hello, world!");
