#!/usr/bin/perl -w use Config; # expand the perl binary module directory at build time print substr($Config{vendorarch}, 1) . "\n";