Perl: "notest install module" from shell using CPAN

cpannti.sh

#!/bin/sh

# Usage: cpannti.sh <module_names>

# cpan (i.e. App::Cpan) does not provide a direct way to install modules without
# testing them, as you can do in the CPAN shell with:
#
#   cpan[1]> notest install FooBarBaz
#
# App::Cpan uses CPAN::Shell under the hood to perform installation, so let's do
# it ourselves the same way, but pass "notest" this time. Key sub for
# installation is CPAN::Shell::rematein().

perl -MCPAN -e 'foreach (@ARGV) { CPAN::Shell->rematein("notest", "install", $_) }' $@