From 1bc343fe5a941093d6ee7a0bd337d57c7dfbb5fa Mon Sep 17 00:00:00 2001 From: "Difrex(Denis Zheleztsov)" Date: Wed, 13 Aug 2014 13:12:49 +0400 Subject: [PATCH] @users link --- II/T.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/II/T.pm b/II/T.pm index 328ea1d..99a2a99 100644 --- a/II/T.pm +++ b/II/T.pm @@ -193,6 +193,9 @@ sub pre { $post =~ s/ii:\/\/(\w+(\.)?\w+\.\d{2,4})/$1<\/a>/g; $post =~ s/ii:\/\/(\w{20})/$1<\/a>/g; + # Users + $post =~ s/@(\w+)(\s|,)/$1<\/a>$2/g; + # Not are regexp parsing my $pre = 0; my $txt;