En vous connectant, vous pouvez utiliser des namespaces (e.g. https://paste.iiens.net/exemple/), supprimer vos pastes, etc.

Conversion IPv4 hexa vers décimal   (raw) expire le 30 July 2017 | 07:26

  1. #!/usr/bin/env tclsh
  2.  
  3. # Convertit une IPv4 représentée en hexadécimal, comme les idents
  4. # envoyés par mibbit ou kiwiirc, en représentation décimale.
  5. proc ipv4_hex2dec ip_hex {
  6.     set ip_bin [binary format H8 $ip_hex]
  7.     binary scan $ip_bin c4 ip_bytes
  8.  
  9.     for {set i 0} {$i < 4} {incr i} {
  10.         set unsigned [expr ([lindex $ip_bytes $i] & 0xff)]
  11.         set ip_bytes [lreplace $ip_bytes $i $i $unsigned]
  12.     }
  13.  
  14.     return [join $ip_bytes .]
  15. }
  16.  
  17. # Affiche "82.216.206.215" à l'écran
  18. puts [ipv4_hex2dec 52d8ced7]
  19.  
  20.  

Écrivez votre texte ci-dessous !

Ajoutez "+++" au début d'une ligne pour la mettre en valeur !

Langage Accès Expire dans


Options