Move unused dependency to test deps

[nailing-cargo.git] / t / toml-test / valid / keys-with-dots.t

diff --git a/t/toml-test/valid/keys-with-dots.t b/t/toml-test/valid/keys-with-dots.t
index 736689316b69061a5a98a110e61affd8f7f2d50f..1b428e8127d7a376a3047b3f3d3f78bb8444974a 100644 (file)
--- a/t/toml-test/valid/keys-with-dots.t
+++ b/t/toml-test/valid/keys-with-dots.t
@@ -2,6 +2,10 @@
 use utf8;
 use Test2::V0;
 use Data::Dumper;
+use DateTime;
+use DateTime::Format::RFC3339;
+use Math::BigInt;
+use Math::BigFloat;
 use TOML::Tiny;
 
 binmode STDIN,  ':encoding(UTF-8)';
@@ -9,25 +13,10 @@ binmode STDOUT, ':encoding(UTF-8)';
 
 my $expected1 = {
                'plain_table' => {
-                                  'with.dot' => bless( {
-                                                         '_file' => '(eval 415)',
-                                                         'name' => '<Custom Code>',
-                                                         'operator' => 'CODE(...)',
-                                                         'code' => sub {
-                                                                       BEGIN {${^WARNING_BITS} = "\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x15\x00\x04\x40\x05\x04\x54"}
-                                                                       use strict;
-                                                                       no feature ':all';
-                                                                       use feature ':5.16';
-                                                                       require Math::BigInt;
-                                                                       'Math::BigInt'->new('4')->beq($_);
-                                                                   },
-                                                         '_lines' => [
-                                                                       6
-                                                                     ]
-                                                       }, 'Test2::Compare::Custom' ),
                                   'plain' => bless( {
                                                       'operator' => 'CODE(...)',
                                                       'name' => '<Custom Code>',
+                                                      '_file' => '(eval 417)',
                                                       'code' => sub {
                                                                     BEGIN {${^WARNING_BITS} = "\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x15\x00\x04\x40\x05\x04\x54"}
                                                                     use strict;
@@ -38,14 +27,34 @@ my $expected1 = {
                                                                 },
                                                       '_lines' => [
                                                                     6
-                                                                  ],
-                                                      '_file' => '(eval 414)'
-                                                    }, 'Test2::Compare::Custom' )
+                                                                  ]
+                                                    }, 'Test2::Compare::Custom' ),
+                                  'with.dot' => bless( {
+                                                         '_file' => '(eval 416)',
+                                                         'code' => sub {
+                                                                       BEGIN {${^WARNING_BITS} = "\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x15\x00\x04\x40\x05\x04\x54"}
+                                                                       use strict;
+                                                                       no feature ':all';
+                                                                       use feature ':5.16';
+                                                                       require Math::BigInt;
+                                                                       'Math::BigInt'->new('4')->beq($_);
+                                                                   },
+                                                         'name' => '<Custom Code>',
+                                                         'operator' => 'CODE(...)',
+                                                         '_lines' => [
+                                                                       6
+                                                                     ]
+                                                       }, 'Test2::Compare::Custom' )
                                 },
                'table' => {
                             'withdot' => {
                                            'plain' => bless( {
-                                                               '_file' => '(eval 416)',
+                                                               '_lines' => [
+                                                                             6
+                                                                           ],
+                                                               'name' => '<Custom Code>',
+                                                               'operator' => 'CODE(...)',
+                                                               '_file' => '(eval 419)',
                                                                'code' => sub {
                                                                              BEGIN {${^WARNING_BITS} = "\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x15\x00\x04\x40\x05\x04\x54"}
                                                                              use strict;
@@ -53,17 +62,12 @@ my $expected1 = {
                                                                              use feature ':5.16';
                                                                              require Math::BigInt;
                                                                              'Math::BigInt'->new('5')->beq($_);
-                                                                         },
-                                                               '_lines' => [
-                                                                             6
-                                                                           ],
-                                                               'operator' => 'CODE(...)',
-                                                               'name' => '<Custom Code>'
+                                                                         }
                                                              }, 'Test2::Compare::Custom' ),
                                            'key.with.dots' => bless( {
-                                                                       '_file' => '(eval 417)',
-                                                                       'operator' => 'CODE(...)',
-                                                                       'name' => '<Custom Code>',
+                                                                       '_lines' => [
+                                                                                     6
+                                                                                   ],
                                                                        'code' => sub {
                                                                                      BEGIN {${^WARNING_BITS} = "\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x15\x00\x04\x40\x05\x04\x54"}
                                                                                      use strict;
@@ -72,16 +76,15 @@ my $expected1 = {
                                                                                      require Math::BigInt;
                                                                                      'Math::BigInt'->new('6')->beq($_);
                                                                                  },
-                                                                       '_lines' => [
-                                                                                     6
-                                                                                   ]
+                                                                       '_file' => '(eval 418)',
+                                                                       'operator' => 'CODE(...)',
+                                                                       'name' => '<Custom Code>'
                                                                      }, 'Test2::Compare::Custom' )
                                          }
                           },
                'plain' => bless( {
-                                   '_file' => '(eval 418)',
-                                   'name' => '<Custom Code>',
                                    'operator' => 'CODE(...)',
+                                   'name' => '<Custom Code>',
                                    'code' => sub {
                                                  BEGIN {${^WARNING_BITS} = "\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x15\x00\x04\x40\x05\x04\x54"}
                                                  use strict;
@@ -90,14 +93,14 @@ my $expected1 = {
                                                  require Math::BigInt;
                                                  'Math::BigInt'->new('1')->beq($_);
                                              },
+                                   '_file' => '(eval 414)',
                                    '_lines' => [
                                                  6
                                                ]
                                  }, 'Test2::Compare::Custom' ),
                'with.dot' => bless( {
-                                      '_lines' => [
-                                                    6
-                                                  ],
+                                      'name' => '<Custom Code>',
+                                      'operator' => 'CODE(...)',
                                       'code' => sub {
                                                     BEGIN {${^WARNING_BITS} = "\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x15\x00\x04\x40\x05\x04\x54"}
                                                     use strict;
@@ -106,9 +109,10 @@ my $expected1 = {
                                                     require Math::BigInt;
                                                     'Math::BigInt'->new('2')->beq($_);
                                                 },
-                                      'operator' => 'CODE(...)',
-                                      'name' => '<Custom Code>',
-                                      '_file' => '(eval 419)'
+                                      '_file' => '(eval 415)',
+                                      '_lines' => [
+                                                    6
+                                                  ]
                                     }, 'Test2::Compare::Custom' )
              };