Select Code to Download

qr{^[A-Za-z_][A-Za-z0-9_]*(?:::[A-Za-z0-9_]+)*$}

#!/usr/bin/env perl

...
for my $mod (@modules) {
    is $mod =~ $re, !!1, "Testing $mod";
}

1..7
ok 1 - Testing strict
...
ok 5 - Testing App::Prove::State::Result::Test
ok 6 - Testing CPAN::Meta::History::Meta_1_0
ok 7 - Testing Encode::KR::2022_KR