Perl - VB

Perl - VB - Programmation

Marsh Posté le 19-05-2001 à 19:55:12    

Quelq'un connait il ces deux langages ?
 
Est il possible de traduire un pt prog en perl en du VB ?
 
Si quelqu'un pouvait maider à traduire çà en VB ...
 
Merci à vous:
 
<script language="perlscript" runat="server">
   
   use IO::Socket;  
     
   # procedure gestion des erreurs
   sub ErrorReport(){
     $Response->Write("Cannot connect!" );
     $Response->end;
    }
     
   # procedure d'interogation whois
   # function whois(domain,server_whois)
   sub whois {
    my ($domain, $server) = @_; #on recupere les parametres de la fonction
    my $returnString=""; #on initialise la chaine de retour de fonction à vide
   
    # ouverture du port WHOIS 43  
    my $remote=new IO::Socket::INET(  
    Proto => "tcp",
    PeerAddr => "$server",
    PeerPort => "whois(43)",
   ) or die ErrorReport;
   
    # interroge le serveur WHOIS  
    $remote->autoflush(1);
    print $remote "$domain\n" . $BLANK;
    while ( <$remote> ) {
    $returnString.=$_;
    }
    close $remote;
 
    #retourne le résultat
    $returnString;
   }
   
</script>

Reply

Marsh Posté le 19-05-2001 à 19:55:12   

Reply

Marsh Posté le 21-05-2001 à 00:47:34    

Je pense pas. Déja le Perl est scripté et le VB compilé, Le vb est uniquement sous win32 aussi. La tu vois bien que le code utilise une classe Socket qui permet d'utiliser ensuite des méthodes. Il faudrait donc réécrire aussi cette classe ... en un mot tout refaire ... Ce n'est que mon opinion d'un point de vue VB (conné pas trop le perl).

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed