[qw(BEGIN bar baz foo quuuux quuux quux)],
"list_all_symbols",
);
- { local $TODO = ($] < 5.010 || $Package::Stash::IMPLEMENTATION eq 'PP')
- ? "undef scalars aren't visible on 5.8, or from pure perl at all"
+ { local $TODO = $] < 5.010
+ ? "undef scalars aren't visible on 5.8"
: undef;
is_deeply(
[sort $quuux->list_all_symbols('SCALAR')],