s//$_^="$'$`"/ger,print pack"H*",$&.unpack("H*")=~s/.(?=.$)//rfor<>