Select Code to Download

use Cwd             qw( getcwd );
use Variable::Magic qw( cast wizard );
...
);

cast my $CD, $wiz;

use experimental qw( refaliasing declared_refs );

...
);

cast my $CD, $wiz;