diff options
| -rwxr-xr-x | www/faq2html.pl | 4 | ||||
| -rwxr-xr-x | www/txt2html.pl | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/www/faq2html.pl b/www/faq2html.pl index eabe674..15a2390 100755 --- a/www/faq2html.pl +++ b/www/faq2html.pl @@ -1,4 +1,4 @@ -#!/usr/bin/perl +#!/usr/local/bin/perl # this is really a faq2html and should only be used for this purpose @@ -6,7 +6,7 @@ sub fixline { $_ =~ s/\</</g; $_ =~ s/\>/>/g; - $_ =~ s/(http:\/\/([a-zA-Z0-9_.\/-]*)[^\) .\n])/\<a href=\"$1\"\>$1\<\/a\>/g; + $_ =~ s/(http:\/\/([a-zA-Z0-9_.\#\/-]*)[^\) .\n])/\<a href=\"$1\"\>$1\<\/a\>/g; $_ =~ s/(\\|\/)$/$1 /g; # clobber backslash on end of line } diff --git a/www/txt2html.pl b/www/txt2html.pl index 43c7fff..6e39e8d 100755 --- a/www/txt2html.pl +++ b/www/txt2html.pl @@ -9,7 +9,7 @@ sub fixline { $_ =~ s/\</</g; $_ =~ s/\>/>/g; - $_ =~ s/(http:\/\/([a-zA-Z0-9_.\/-]*)[^\) .\n])/\<a href=\"$1\"\>$1\<\/a\>/g; + $_ =~ s/(http:\/\/([a-zA-Z0-9_.\#\/-]*)[^\) .\n])/\<a href=\"$1\"\>$1\<\/a\>/g; $_ =~ s/(\\|\/)$/$1 /g; # clobber backslash on end of line } |