print pack('a30x',$reference);