The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package UnicodeToggle;

use Moose;
use perl5i::2;

has get_domains_to_test => (
    is      => 'ro',
    isa     => 'ArrayRef',
    default => sub {
        [
            qw/
            bloß.de
            test.xn--o3cw4h
            bloß.co.at
              /
        ];
      }
);


__END__

=head1 NAME

UnicodeToggle - ShortDesc

=head1 SYNOPSIS

# synopsis...

=head1 DESCRIPTION

# longer description...