The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use Test::Chunks tests => 3;

my @chunks = chunks();

sub foo {
    is(filter_arguments, '123,456');
}

sub bar {
    is(filter_arguments, '---holy-crow+++');
    is($_, "one\n  two\n");
}

__DATA__
===
--- xxx foo=123,456

=== 
--- xxx bar=---holy-crow+++
one
  two