The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
INGY / Test-Base-0.88 / t / delimiters.t 
use Test::Base tests => 2;

delimiters qw($$$ ***);

run {
    ok(shift);
};

__END__

$$$
*** foo
this
*** bar
that

$$$

*** foo
hola
*** bar
latre