Select Code to Download

use Hook::LexWrap;
use File::Copy::Recursive qw(dircopy);
...

dircopy($dir_from, $dir_to);
print "\n";

use File::Copy::Recursive qw(dircopy);
use strict;
...
dircopy($dir_from, $dir_to);
print "\n";