fix(perl): Fixes for perl

Signed-off-by: dark0dave <dark0dave@mykolab.com>

Author: dark0dave

stratagems/ascension/resource/ar6005sr.bmp

@@ -53,11 +53,15 @@ DEFINE_ACTION_FUNCTION ~compile_ssl_to_bcs_core~ INT_VAR skip_bcs=0 STR_VAR scri
           END
           DELETE "%workspace%/ssl_out/%script%.baf"
           ACTION_IF ~%WEIDU_OS%~ STRING_COMPARE_CASE ~WIN32~ THEN BEGIN
-                OUTER_INNER_PATCH_SAVE scsargs "%full_loc%/%script%" BEGIN
-                     REPLACE_TEXTUALLY "\" "/"
-                END
-		AT_NOW ~chmod 755 %MOD_FOLDER%/%ssl_loc%/ssl.pl~
-                AT_NOW ~/usr/bin/perl %MOD_FOLDER%/%ssl_loc%/ssl.pl %scsargs% "%sslvariables%" -o %workspace%/ssl_out -l %ssllibrary% %workspace%/autolib %booleanstring%~ EXACT	  
+               OUTER_INNER_PATCH_SAVE scsargs "%full_loc%/%script%" BEGIN
+                  REPLACE_TEXTUALLY "\" "/"
+               END
+               LAF check_ini STR_VAR ini=Use_Perl_Natively RET value END
+               ACTION_IF value BEGIN
+                  AT_NOW ~perl %MOD_FOLDER%/%ssl_loc%/ssl.pl %scsargs% "%sslvariables%" -o %workspace%/ssl_out -l %ssllibrary% %workspace%/autolib %booleanstring%~ EXACT
+               END ELSE BEGIN
+                  AT_NOW ~/usr/bin/perl %MOD_FOLDER%/%ssl_loc%/ssl.pl %scsargs% "%sslvariables%" -o %workspace%/ssl_out -l %ssllibrary% %workspace%/autolib %booleanstring%~ EXACT
+               END
           END ELSE BEGIN
                 LAF check_ini STR_VAR ini=Use_Perl_Natively RET value END
                 ACTION_IF value BEGIN

stratagems/sfo/general/lib_general.tpa

@@ -95,7 +95,12 @@ BEGIN
 				REPLACE_TEXTUALLY EXACT_MATCH "\" "/"
 			END
 			AT_NOW ~chmod 755 %ssl_loc%/ssl.pl~
-			AT_NOW ~/usr/bin/perl %ssl_loc%/ssl.pl %scsargs% "%sslvariables%" -o %workspace%/ssl_out -l %ssllibrary% %data_loc%/autolib %booleanstring%~ EXACT	  
+			LAF check_ini STR_VAR ini=Use_Perl_Natively RET value END
+			ACTION_IF value BEGIN
+				AT_NOW ~perl %ssl_loc%/ssl.pl %scsargs% "%sslvariables%" -o %workspace%/ssl_out -l %ssllibrary% %data_loc%/autolib %booleanstring%~ EXACT
+			END ELSE BEGIN
+				AT_NOW ~/usr/bin/perl %ssl_loc%/ssl.pl %scsargs% "%sslvariables%" -o %workspace%/ssl_out -l %ssllibrary% %data_loc%/autolib %booleanstring%~ EXACT
+			END
 		END
 	END
 END

stratagems/sfo2e/lib_ssl.tph

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 my $scsline="";
 # my $defaultlibraryfile="scsii/ssl/library.slb";

stratagems/ssl/ssl.pl

@@ -1,5 +1,4 @@
 [spell system changes]
-
 acid_storm_tonedown=1
 adjust_monster_summoning=1
 antimagic_penetrates_ii=1
@@ -78,12 +77,10 @@ use_iwd_strength_of_one=1
 web_and_the_large=1
 
 [spell system finetuning]
-
 enhance_cure_cause_setting=average
 auras_are_party_friendly=1
 
 [nerfed and moved items]
-
 no_item_nerf_balduran_shield=1
 no_item_nerf_magi_staff=0
 no_item_nerf_mirror_cloak = 0
@@ -94,7 +91,6 @@ no_item_nerf_vecna = 0
 no_initial_change_elemental_arrows = 0
 
 [component tweaks]
-
 mage_level_add = 0
 mage_level_scale = 100
 priest_level_add = 0
@@ -133,8 +129,6 @@ provisions_reset_after_sea_voyage=1
 provisions_reset_in_stronghold=1
 dragons_get_plus_one_apr=0
 
-
-
 [hotkeys]
 hot_key_A=A
 hot_key_B=B
@@ -147,7 +141,6 @@ hot_key_S=S
 hot_key_V=V
 
 [other]
-
 AI_Does_Not_Detect_Items = 0
 AI_Is_Omniscient = 0
 Do_Not_Fix_Save_Errors = 0
@@ -157,7 +150,7 @@ Genai_Does_Not_Adjust_Levels = 0
 Genai_Does_Not_Adjust_Profs = 0
 Conceal_Prebuff_Spell_Names = 0
 Force_No_HLA_Repeats = 0
-thac0_tolerance=6
+thac0_tolerance = 6
 library_override = none
 disable_easter_eggs = 0
 enable_difficulty_based_damage_changes = 0
@@ -171,14 +164,13 @@ no_lizard_biff = 0
 do_not_biff_iwd_resources = 1
 
 [internal/debug]
-
-Disable_SSL = 0
+Disable_SSL=0
 God_Does_Not_Play_Dice=0
 force_tra_rebuild=0
 debug_variable=0
-use_perl_natively=0
-Scroll_Drop_Fraction = 10
-assume_unmodified_iwd_scripts = 1
+use_perl_natively=1
+Scroll_Drop_Fraction=10
+assume_unmodified_iwd_scripts=1
 poison_stat=162
 log_elemental_cre=0