#! /usr/bin/perl -l

use strict;
use warnings;
use lib sub { print pop; undef };

use File::Find;
use File::Basename;
use File::Find;

__END__