$perl ml_a.pl 6
>> i=2
>> i=3
>> i=4
>> i=5
>> i=6
>> i=7
>> i=8
>> i=9
>> i=10
RESTORE 6
<< i=6
<< i=5
<< i=4
<< i=3
<< i=2
<< i=1