Acme::Laugh 0.0.2

Acme::Laugh is a Perl module that can add joy to your scripts.

SYNOPSIS

use Acme::Laugh qw( laugh );

print laugh(5); # print a short laugh
print laugh(50); # print a long laugh

Laughing is something that lets humans distinguish themselves from other forms of life. Now computers are nearer to us.

Have you ever needed to generate a laugh? I had: in IRC, to laugh at other people (for fun!). So, here we are!

INTERFACE

This module lets you export the laugh function:

my $l = laugh( $length );
my $l = laugh(); # Random length

This function accepts an optional $length parameter, which lets you trim the length of the generated laugh. This length has little to do with the actual string length (which you can trim later, if you want), but higher values generate longer laughs in average. Ok, peruse the code to see it!