eval'p %d/%d/1000*1000'%[*$<]