clickable - Make URL clickable.

This commit is contained in:
Wolfram Schneider 1998-07-15 12:50:56 +00:00
parent b4fa0d9b59
commit c4bff798b4
Notes: svn2git 2020-12-08 03:00:23 +00:00
svn path=/www/; revision=3063
2 changed files with 18 additions and 0 deletions

9
data/news/clickable.pl Executable file
View file

@ -0,0 +1,9 @@
#!/usr/bin/perl -np
# Copyright (c) Juli 1998 Wolfram Schneider <wosch@FreeBSD.org>. Berlin.
#
# clickable - Make URL clickable
#
# $Id: clickable.pl,v 1.1 1998-07-15 12:50:56 wosch Exp $
s/</&lt;/g;
s%((http|ftp)://[^\s"\)\>,;]+)%<A HREF="$1">$1</A>%gi;

9
en/news/clickable.pl Executable file
View file

@ -0,0 +1,9 @@
#!/usr/bin/perl -np
# Copyright (c) Juli 1998 Wolfram Schneider <wosch@FreeBSD.org>. Berlin.
#
# clickable - Make URL clickable
#
# $Id: clickable.pl,v 1.1 1998-07-15 12:50:56 wosch Exp $
s/</&lt;/g;
s%((http|ftp)://[^\s"\)\>,;]+)%<A HREF="$1">$1</A>%gi;