Kozz has asked for the wisdom of the Perl Monks concerning the following question:
The book "Mastering Regular Expressions" is on my wishlist, but thus far I consider myself to be perhaps only an intermediate-skilled monk with regexes. My goal is to create a sub that would "hotlink" text containing http or mailto URIs. This has been done in another node, but not to the extent to which I'd like, and doesn't cover all cases. I've read up on perlman:perlre, Email::Valid as well, and saw the nightmare-ish super-long regex, which was far more complex than I was hoping for. The thing is that I don't really want/need to validate the domain and mx record for emails or whatever - just want to identify those things that LOOK LIKE URIs and hyperlink them accordingly. Perhaps there are other modules which could be used in conjunction with one another to identify potential URIs and deal with all the different formats/cases? See the code below.
If you try the code, you'll see that the actual output of the above regex is#!/usr/bin/perl use strict; my $string = q{ An email address is foo-master@bar.com, but this http://foo@bar.com/ and this ftp://foo:baz@bar.com/ are not emails. }; my $desired_output = q{ An email address is <A HREF="mailto:foo-master@bar.com">foo-master@b +ar.com"</A>, but this <A HREF="http://foo@bar.com/">http://foo@bar.com/</A> and this <A HREF="ftp://foo:baz@bar.com/">ftp://foo:baz@bar.com/</A> are not emails. }; foreach($string){ # make http or ftp hyperlinks first s#((ht|f)tp://[\S]+)#<A HREF="$1">$1</A>#isg; # now make email addresses hyperlinks # but don't "email-ify" http or ftp URIs s#((?<!tp://)[a-z0-9\-\_\.]+\@[a-z0-9\-]+(\.[a-z0-9\-]+)+)#<A HRE +F="mailto:$&">$&</A>#isg; if( m#(?<!tp://)[a-z0-9\-\_\.]+\@[a-z0-9\-]+(\.[a-z0-9\-]+)+#isg) +{ print "Yes, it matches ($&).\n"; }else{ print "It does not match.\n"; } print; }
:-( I thought I could surely get this figured out with a moderately simple regex, but the test-cases I've used here have proved quite difficult. How close am I? Or am I going about it the wrong way, or can it not be done with these test cases? I thank you in advance for your consideration. --KozzYes, it matches (foo-master@bar.com). An email address is <A HREF="mailto:foo-master@bar.com">foo-master@b +ar.com</A>, but this <A HREF="http://f<A HREF="mailto:oo@bar.com">oo@bar.com</A>/">h +ttp://f<A HREF="mailto:oo@bar.com">oo@bar.com</A>/</A> and this <A HREF="ftp://foo:<A HREF="mailto:baz@bar.com">baz@bar.com</A> +/">ftp://foo:<A HREF="mailto:baz@bar.com">baz@bar.com</A>/</A> are not emails.