UseModWiki소스수정/한글페이지인터위키| -3,7 +3,7 |
| * Jof:UseModWiki소스수정/한글링크 를 적용 |
| * 부작용 : 알려진 것 없음 |
| : |
| {{{perl |
| {{{#!vim perl |
| sub SplitUrlPunct { |
| .... |
| $punct = ""; |
sub SplitUrlPunct { .... $punct = ""; # 아래 두 줄의 xc0 을 x80 으로 바꿈 # ($punct) = ($url =~ /([^a-zA-Z0-9\/\xc0-\xff]+)$/); # $url =~ s/([^a-zA-Z0-9\/\xc0-\xff]+)$//; ($punct) = ($url =~ /([^a-zA-Z0-9\/\x80-\xff]+)$/); $url =~ s/([^a-zA-Z0-9\/\x80-\xff]+)$//; return ($url, $punct); }