We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 7c59445 commit 68a5d1cCopy full SHA for 68a5d1c
t/08_corelist.t
@@ -13,10 +13,10 @@ SKIP: {
13
skip 'No tied hash in Modules::CoreList in Perl', 2
14
if $@;
15
16
- my $foo = version->parse($Module::CoreList::version{5.008_000}{base});
+ my $foo = "version"->parse($Module::CoreList::version{5.008_000}{base});
17
18
is $foo, 1.03, 'Correctly handle tied hash';
19
20
- $foo = version->qv($Module::CoreList::version{5.008_000}{Unicode});
+ $foo = "version"->qv($Module::CoreList::version{5.008_000}{Unicode});
21
is $foo, '3.2.0', 'Correctly handle tied hash with dotted decimal';
22
}
0 commit comments