sub GetHeader { ... if ($id ne '') { # $result .= $q->h1(&GetSearchLink($id)); 이 부분을 $result .= $q->h1($header . &GetSearchLink($id)); # 이렇게 고쳐줄 것 } else { $result .= $q->h1($header . $title); } ... }