Bonjour à tous,
Le programme ci-dessous a été écrit en PYTHON et j'aimerai le tranformer en PERL, quelqu'un pourrait-il m'aider à trouver les différences entre les 2 langages ?
Merci d'avance.
Adoc5.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21 import TOTOFile toto = TOTO.TOTOFile(r"D:\MDR\LOL.TOTO") teach_ranges = ( (0x41, 171), (0x100, 320) ) idx = 1 for address, count in teach_ranges: for i in range(count): comment = "" if toto.has_key(address): value = toto.get(address) comment = "" else: comment = " NOP, to fill" value = 0x9D print "teach_data[%d]=16#%x -- ($%X)%s"%(idx, value, address, comment) address += 1 idx += 1
Partager