Sponsoring The Perl Toolchain Summit 2025: Help make this important event another success Learn more

#!/usr/bin/perl -w
#########################################################################
#
# Serż Minus (Sergey Lepenkov), <abalama@cpan.org>
#
# Copyright (C) 1998-2023 D&D Corporation. All Rights Reserved
#
# This is free software; you can redistribute it and/or modify it
# under the same terms as Perl itself.
#
#########################################################################
use strict;
eval "use Test::Fixme";
plan skip_all => "requires Test::Fixme to run" if $@;
run_tests(
where => [qw/lib/],
match => qr/\s+([T]ODO|[F]IX(ME|IT)?|[B]UG)\W/,
warn => 1,
);
1;
__END__