perl added pion uri scripts (sequence = 4) and new take on domain (sequence = 5)