C:/Strawberry/perl/bin\perl.exe -w d:/tmp/pm/do_once.pl 
========= IMPLEMENTATION
========= TESTS
--- with basic logic
0 smaller 1
1 smaller 3
2 smaller 3
3 has no match
4 between 3 and 5
5 has no match
--- with some syntactic sugar
0 smaller 1
1 smaller 3
2 smaller 3
3 smaller 4 or 5
4 smaller 4 or 5
5 has no match
--- with even MORE syntactic sugar
0 smaller 1
1 smaller 3
2 smaller 3
3 smaller 4 or 5
4 smaller 4 or 5
5 has no match

Compilation finished at Sat Jul  3 18:15:36