perlmeditation
dragonchild
The idea comes from [http://stuartsierra.com/2009/01/18/tests-are-code]. It's a neat idea, probably best suited for functional programming where one-liners are the norm and not the exception. BUT ... I think we could do it in Perl. Something like:
<code>
use Test::With;
sub foo : WithTests( 2 ) {
my ($x, $y) = @_;
return $x + y;
} with_test {
cmp_ok( foo( 4, 3 ), '==', 7 );
cmp_ok( foo( -6, 2 ), '==', -4 );
};
</code>
I'm not even sure if that syntax will work, but it looks appealing. :-)
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-85580">
<hr>
My criteria for good software:
<ol>
<li>Does it work?
<li>Can someone else come in, make a change, and be reasonably certain no bugs were introduced?
</ol>
</div></div>