Use of uninitialized value $_ in pattern match (m//) at ... line 27.
DEBUG = 1
[1, 2, 3]
{
    use warnings;
    use strict;
    my(@a) = 1..3;
    dmp /#/, @a;
}