Perl script to setup environment