sub frobnitz { ... }

ok( frobnitz( )                       eq $no_params_results );
ok( frobnitz( @some_parameters )      eq $expected_results );
ok( frobnitz( @some_other_parameters) eq $other_expected_results );