URI::Find::Simple

URI::Find::Simple is a simple interface to URI::Find.
Download

URI::Find::Simple Ranking & Summary

Advertisement

  • Rating:
  • License:
  • GPL
  • Price:
  • FREE
  • Publisher Name:
  • Tom Insam
  • Publisher web site:
  • http://search.cpan.org/~tomi/URI-Find-Simple-1/lib/URI/Find/Simple.pm

URI::Find::Simple Tags


URI::Find::Simple Description

URI::Find::Simple is a simple interface to URI::Find. URI::Find::Simple is a simple interface to URI::Find.SYNOPSIS use URI::Find::List qw( list_uris ); my @list = list_uris($text); my $html = change_uris($text, sub { "$_" } );URI::Find is all very well, but sometimes you just want a list of the links in a given piece of text, or you want to change all the urls in some text somehow, and don't want to mess with callback interfaces.This module uses URI::Find, but hides the callback interface, providing two functions - one to list all the uris, and one to change all the uris.list_uris( text )returns a list of all the uris in the passed string, in the form output by the URI->as_string function, not the form that they exist in the text.change_uris( text, sub { code } )the passed sub is called for every found uri in the text, and it's return value is substituted into the string. Returns the changed string.CAVEATS, BUGS, ETCThe change_uris function is only just nicer than the callback interface. In some ways it's worse. I's prefer to just pass an s/// operator somehow, but I don't think that's possible.The list_uris function returns the stringified versions of the URI objects, this seemed to be the sensible thing. To present a consistent interface, the change_uris function operates on these strings as well, which are not the same as the strings actually present in the original. Therefore this code: my $text = change_uris($text, sub { shift } );may not return the same thing you pass it. URIs such as < URI:http://jerakeen.org > will be converted to the string 'http://jerakeen.org'. Requirements: · Perl


URI::Find::Simple Related Software