use Shell qw( perl );

BEGIN { Shell->import( qw( dir ) ); }

BEGIN { Shell->import( qw( copy ) ); }

BEGIN { Shell->import( qw( del ) ); }

BEGIN { Shell->import( qw( cd ) ); }