%pos= map { $_=>$i++ } reverse @input;