$string = join('-',unpack('A4 A4',pack('A*',$string)));