Re: Name "main::a" used only once: possible typo

[Khen1950fx]

Maybe this is satisfactory?

#!/usr/bin/perl -l

use strict;
use warnings FATAL => 'syntax';
use List::Util qw/reduce/;

print reduce( sub {
    $a * $b;
}, 1..6);