use Shell qw( perl ); BEGIN { Shell->import( qw( dir ) ); } BEGIN { Shell->import( qw( copy ) ); } BEGIN { Shell->import( qw( del ) ); } BEGIN { Shell->import( qw( cd ) ); } #### BEGIN { require Shell; Shell->import( qw( perl ) ); } BEGIN { require Shell; Shell->import( qw( dir ) ); } BEGIN { require Shell; Shell->import( qw( copy ) ); } BEGIN { require Shell; Shell->import( qw( del ) ); } BEGIN { require Shell; Shell->import( qw( cd ) ); }