1#!perl -T
2
3use strict;
4use warnings;
5
6use Test::More tests => 1;
7
8use Test::PerlTidy;
9
10my @wanted_files = sort qw(
11  Makefile.PL
12  lib/Test/PerlTidy.pm
13  t/critic.t
14  t/exclude_files.t
15  t/exclude_perltidy.t
16  t/is_file_tidy.t
17  t/list_files.t
18  t/perltidy.t
19  t/pod-coverage.t
20  t/pod.t
21  t/strict.t
22);
23
24my @found_files = Test::PerlTidy::list_files('.');
25
26is_deeply( \@wanted_files, \@found_files );
27