<% use Data::Dumper; use DirHandle; my $sLoginVersion = 'prod'; # Retrieve the latest available release for the version my $sRelease = 1; if (my $oDh = new DirHandle('/d_drive/inetpub/wwwroot/webtraderdb/javascriptsource/'.$sLoginVersion)) { while (my $sReleaseDn = $oDh->read()) { if ($sReleaseDn =~ m/^\d+$/) { if ($sReleaseDn > $sRelease) { $sRelease = $sReleaseDn; } } } $oDh->close(); } my $sScriptUri = $Request->{'ServerVariables'}->{'SCRIPT_URI'}; my $sHost = $Request->{'ServerVariables'}->{'HTTP_HOST'}; my $bIsSecure = $sScriptUri =~ m/^https:/i; my $bIsMirror = $sHost =~ m/intexmirror/i; %> Start INTEXnet
Intex Home
 
Start  INTEXnet
 
Overview
 
Request more info
 

and Intex Customer Service pages

Please enter your login password        
  

Request more info       Forget your password?

Having problems logging in? Try this alternative login page instead.

Intex clients, please note:
By submitting your password, you agree to adhere to the contractual agreements that you have with Intex Solutions, Inc.
Please keep this password private and confidential.

Go to "INTEXnet Secure" login page   What's that?             Go to "INTEXnet mirror" login page   What's that?