HTML::AsSubs(3pm)

💖 HTML::AsSubs(3pm) — User Contributed Perl Documentation 💖

🌸 NAME 🌸

HTML::AsSubs — functions that construct a HTML syntax tree. that's the whole name, bestie. no cap. 💅

⭐ VERSION ⭐

This document describes version 5.07 of HTML::AsSubs, released August 31, 2017 as part of HTML-Tree. 💖

✨ SYNOPSIS ✨

Okay so check this out — you use HTML::AsSubs; and then build stuff like:

use HTML::AsSubs;
$h = body(
          h1("This is the heading"),
          p("This is the first paragraph which contains a ",
            a({href=>'link.html'}, "link"),
            " and an ",
            img({src=>'img.gif', alt=>'image'}),
            "."
           ),
         );
print $h->as_HTML;

and then print $h->as_HTML; slays the output. 💅

🦋 DESCRIPTION 🦋

Okay so this module exports functions that can be used to construct various HTML elements. The functions are named after the tags of the corresponding HTML element and are all written in lower case. If the first argument is a hash reference then it will be used to initialize the attributes of this element. The remaining arguments are regarded as content. fr fr.

For a similar idea (i.e., it's another case where the syntax tree of the Perl source mirrors the syntax tree of the HTML produced), see HTML::Element's new_from_lol method. Bestie, the source tree literally mirrors the HTML tree — it's giving main character energy. 🌈

The original author says: for what I now think is a cleaner implementation of this same idea, see the excellent module XML::Generator, which is what I suggest for actual real-life use. (I suggest this over HTML::AsSubs and over CGI.pm's HTML-making functions.) 👑

🎀 ACKNOWLEDGEMENT 🎀

This module was inspired by the following message, and honestly? iconic. 💌

Date: Tue, 4 Oct 1994 16:11:30 +0100
Subject: Wow! I have a large lightbulb above my head!

Take a moment to consider these lines:

%OVERLOAD=( '""' => sub { join("", @{$_[0]}) } );

sub html { my($type)=shift; bless ["<$type>", @_, "</$type>"]; }

:-)  I *love* Perl 5!  Thankyou Larry and Ilya.

Regards,
Tim Bunce.

p.s. If you didn't get it, think about recursive data types: html(html())
p.p.s. I'll turn this into a much more practical example in a day or two.
p.p.p.s. It's a pity that overloads are not inherited. Is this a bug?

💀 BUGS 💀

⚠️ bestie, watch out for these two:

• The exported link() function overrides the builtin link() function. not me finding out the hard way 😭
• The exported tr() function must be called using &tr(...) syntax because it clashes with the builtin tr/../../ operator. so yes, you literally have to use &tr(...) — no cap. 💅

🔎 SEE ALSO 🔎

HTML::Element, XML::Generator

🏷️ html head title base link meta isindex nextid script style body h1 h2 h3 h4 h5 h6 p pre div blockquote a img br hr ol ul dir menu li dl dt dd dfn cite code em kbd samp strong var address span b i u tt center font big small strike sub sup table tr td th caption form input select option textarea object applet param map area frame frameset noframe

A bunch of methods for creating tags. 🫶

🛠️ Private Functions 🛠️

_elem()

The _elem() function is wrapped by all the html 'tag' functions. It takes a tag-name, optional hashref of attributes and a list of content as parameters. 🧚

👑 AUTHOR 👑

Current maintainers:

• Christopher J. Madsen <perl AT cjmweb.net>
• Jeff Fearn <jfearn AT cpan.org>

Original HTML-Tree author:

• Gisle Aas

Former maintainers:

• Sean M. Burke
• Andy Lester
• Pete Krawczyk <petek AT cpan.org>

You can follow or contribute to HTML-Tree's development at https://github.com/kentfredric/HTML-Tree. 💖

📜 COPYRIGHT AND LICENSE 📜

Copyright 1995-1998 Gisle Aas, 1999-2004 Sean M. Burke, 2005 Andy Lester, 2006 Pete Krawczyk, 2010 Jeff Fearn, 2012 Christopher J. Madsen.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

The programs in this library are distributed in the hope that they will be useful, but without any warranty; without even the implied warranty of merchantability or fitness for a particular purpose.

---

That's the whole page, bestie! 🌸 This one is from perl v5.42.0, dated 2017-09-01, and it's the HTML::AsSubs(3pm) page. mwah 💋 🫶