The Perl Toolchain Summit 2025 Needs You: You can help 🙏 Learn more

#!perl -T
use strict;
use Test::More tests => 1;
my @wanted_files = sort qw(
Makefile.PL
lib/Test/PerlTidy.pm
t/critic.t
t/exclude_files.t
t/exclude_perltidy.t
t/is_file_tidy.t
t/list_files.t
t/perltidy.t
t/pod-coverage.t
t/pod.t
t/strict.t
);
my @found_files = Test::PerlTidy::list_files('.');
is_deeply( \@wanted_files, \@found_files );