![]() |
![]()
| ![]() |
![]()
NAMEHTML::Entities::Interpolate - Call HTML::Entities::encode_entities, via a hash, within a stringSynopsisThis is scripts/synopsis.pl:#!/usr/bin/env perl use strict; use warnings; use HTML::Entities::Interpolate; # ------------------------------ my($block_1) = '<p>Para One</p>'; my($block_2) = "<p align='center'>Para Two</p>"; my($block_3) = 'http://tipjar.com/bin/test?foo=bar®=inald'; my($block_4) = $Entitize{$block_3}; print <<EOS; <html> <head> <title>Test HTML::Entities::Interpolate</title> </head> <body> <h1 align='center'>HTML::Entities::Interpolate</h1> <form action='#'> <table align='center'> <tr> <td align='center'>Input: <input name='data' value='$Entitize{$block_1}'></td> </tr> <tr> <td align='center'><br>The full text of the block is <pre>$Entitize{$block_2}</pre></td> </tr> <tr> <td align='center'><br>Check out the web page at: <a href='$block_3'>$block_4</a></td> </tr> </table> </form> </body> </html> EOS Description"HTML::Entities::Interpolate" is a pure Perl module.Constructor and initializationNot needed.See AlsoHTML::Entities.Machine-Readable Change LogThe file Changes was converted into Changelog.ini by Module::Metadata::Changes.Repository<https://github.com/ronsavage/HTML-Entities-Interpolate>Support<https://rt.cpan.org/Public/Dist/Display.html?Name=HTML::Entities::Interpolate>.AuthorDavid Nicol <davidnicol@gmail.com>.Maintainer: Ron Savage <ron@savage.net.au>. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. The full text of the license can be found in the LICENSE file included with this module.
|