Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number

Why I like functional programming

by tilly (Archbishop)
on Oct 01, 2000 at 03:25 UTC ( #34786=perlmeditation: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download

  1. or download this
    use strict;
    use vars qw(@open_tags %handlers %bal_tag_attribs);
    use HTML::Entities qw(encode_entities);
    use Carp;
  2. or download this
    # This covers the majority of rules
    %bal_tag_attribs = (
      # And our escape mode.
      '[code]' => ret_escape_code(qr(\[/code\]), "[code]"),
  3. or download this
    sub ret_const_tag_open {
      my $tag = shift;
      my $err = join '', @_;
      return "<h2><font color=red>$err</font></h2> ";
  4. or download this
    =head1 B<scrub_input()>
      confess("I have no idea how I got here!");

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlmeditation [id://34786]
Approved by root
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (11)
As of 2016-10-27 13:32 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (362 votes). Check out past polls.