Select Code to Download

use Shell qw( perl );

...
use Shell qw( del );

use Shell qw( cd );

use Shell qw( perl dir copy del cd );

use Shell qw( perl );

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

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