BEGIN {
    my $frameworkpath = "Frameworks/Tcl.Framework/Versions/8.5/Tcl";
    print $ENV{'PERL_TCL_DL_PATH'} = $frameworkpath;
}