#!/usr/bin/env perl -T

use strict;
use warnings;

BEGIN {
    use File::Spec;

    # To avoid "Insecure $ENV{PATH} while running with -T switch"
    $ENV{PATH} = join ':', grep { File::Spec::->file_name_is_absolute($_) }
                    split /:/, $ENV{PATH};

    # To ensure there's no dependency on these potentially insecure variables
    delete @ENV{qw(IFS CDPATH ENV BASH_ENV)};
}