{

my $ip = $InternalInterface{'IPAddress'};
$OUT .=<<"EOF";
SET IPASSERELLE_IP=$ip
REM Scripts globaux
for /F "tokens=*" %%f in ('dir /B /ON \\\\%IPASSERELLE_IP%\\tools\\scripts\\session\\*.bat') do call \\\\%IPASSERELLE_IP%\\tools\\scripts\\session\\%%f

REM Script personnel
if exist \\\\%IPASSERELLE_IP%\\tools\\scripts\\users\\%USERNAME%.bat call \\\\%IPASSERELLE_IP%\\tools\\scripts\\users\\%USERNAME%.bat

EOF

# Unix2dos
$OUT =~ s/\n/\r\n/g;

}
