Select Code to Download

use strict;
use warnings;
...
$dir = $script->dir;
$script = $script->basename;

use strict;
use warnings;
...
}

print $t->as_HTML;