The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!/usr/bin/perl
use strict;
use warnings;

use File::Spec::Functions qw( catfile );
use Perl::Tidy;

my $rc_filepath = catfile( 'devel', 'kinotidyrc' );

Perl::Tidy::perltidy( perltidyrc => $rc_filepath );