diff options
Diffstat (limited to 't/anon.t')
-rw-r--r-- | t/anon.t | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -9,4 +9,8 @@ my $fun = fun ($x, $y) { $x * $y }; is($fun->(3, 4), 12); +my $fun2 = fun ($z, $w = 10) { $z / $w }; + +is($fun2->(60), 6); + done_testing; |