#!/usr/bin/perl use strict; eval { require 'testee.pl'; }; if ($@) { warn(); } print "\nDone!\n";