use strict;
use warnings;
-use Test::More;
+use Test::More 0.88;
our $i;
BEGIN { $i = 0 };
=>
123
);
+BEGIN { is($i, 0) }
-TODO: {
- BEGIN {
- local $TODO = 'fat commas not quoting barewords';
- is($i, 0);
- }
-}
+is_deeply(\@foo, ['method', '123']);
done_testing;