sub Extract_Template {
	if ($ScriptName =~ /\.exe$/i) {
		my $zip = Archive::Zip->new();
		my $status = $zip->read( $ScriptName );
		die "Read of $ScriptName failed\n" if $status != AZ_OK;
		$status = $zip->extractMemberWithoutPaths($MODFILE);
		die "Extraction of Template File \"$MODFILE\" within $ScriptName failed\n EXITING\n" if $status != AZ_OK;
	}
}