8 my ($class, $target, @args) = @_;
9 install variant_values => sub { [@args] };
11 $INC{'TestVariable.pm'} = __FILE__;
16 is_deeply TestVariable(23)->variant_values, [23],
17 'simple value argument';
18 is_deeply TestVariable(3..7)->variant_values, [3..7],
19 'multiple value arguments';
20 is_deeply TestVariable({ foo => 23 })->variant_values, [{ foo => 23 }],
21 'hash reference argument';