雑 記 帳
|
|
|
|
|
|
|
|
|
|
|
|
| [直接移動] [先頭] [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] [11] [12] [13] [14] [15] [16] [17] [18] [19] [20] |
|
|
|
|
|
|
|
|
|
|
|
|
| [直接移動] [先頭] [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] [11] [12] [13] [14] [15] [16] [17] [18] [19] [20] |
- Joyful Note - - JOYFULYY v2.50y24m72 -
- latest joyfulyy_tomokun : edit by tomo&Heroka -
７８２行目を修正すれば回避できる。
https://と入力するとhttp://https//表示されていた→http://と表示される。エラー回避できる。まだ改善しないといけない。
例2
#-------------------------------------------------
# リンク処理
#-------------------------------------------------
sub auto_link {
local($msg, $f) = @_;
$msg =~ s/([^=^\"]|^)(http\:[\w\.\~\-\/\?\&\+\=\:\@\%\;\#\%]+)/$1$2<\/a>/g;
$msg =~ s/>>(\d)([\d\-]*)/>>$1$2<\/a>/gi;
となっているので、httpだけになっているようです。
ここをhttpとhttpsと両方通用させるようにするには？
ということで、調べると
http://www.kent-web.com/support/old/66/0072.html
これは、WebPatio 2.11ですから、古い物の改造例ですが
https?\ と?\を付ければ良いようです。
もうテスト投稿は消しましたが、２回試してOKでした。
今後は、httpsでも自動リンクになります。
正しくないcgi
#-----------------------------------------------------------
# 自動リンク
#-----------------------------------------------------------
sub auto_link {
my $text = shift;
$text =~ s/(s?https?:\/\/([\w-.!~*'();\/?:\@=+\$,%#]|&)+)/$1<\/a>/g;
return $text;
}