fred@homefree ~/work/perl > diff outline2faq~ outline2faq
3c3,5
< # outline2faq version 1.0
--- > # outline2faq version 1.01 > # > # 86c88 < if ($line_in =~ m/\s\S*:\/\/\S*\s/) # There is an URL in the line--- > if ($line_in =~ m/(^|\s)\S*:\/\/\S*\s/) # There is an URL in the line(sorry my Perld definitely needs work... :) )
Fred. ----------------------------------------------------------------------------- This text is entirely made of the freshest hand picked electrons I speak for no one except me and my cat. ---------------------------------- Linux ------------------------------------
[
Usenet Hypertext FAQ Archive |
Search Mail Archive |
Authors |
Usenet
]
[
1993 |
1994 |
1995 |
1996 |
1997
]
© Copyright The Landfield Group, 1997
All rights reserved