... sub GetGotoBar { ... if ($id =~ m|/|) { $main = $id; $main =~ s|/.*||; # Only the main page name (remove subpage) # $bartext .= " </td><td> " . &GetPageLink($main); 이 줄을 아래와 같이 바꾼다 $bartext .= " </td><td> <img src=\"./emoticon/parentpage.gif\" border=\"0\" alt=\"상위페이지: $main\" align=\"absmiddle\">" . &GetPageLink($main); } ... } ...