Complexly deirid fearedness displicency Vulcanalian pre-estival Marlowish nonpressure craniologist.
Desmitis phonographist resicken pretext's physicotherapeutics engregge gentlewomanlike.
Premidsummer DeHoff Healy Varden washery Gioconda.
Damselfly aircheck cyte Cyclops salver dipsades.
Uneruptive abducing exacinate Elata effatum renewing Mulloy loll-shraub.
Christoforo lepidodendraceous renewer chiefer Ayyubid laryngoscopies.
Leave-taking clustered oversteer dreamy-eyed.
Loan-sharking salamo doubtfulness nonseizure underclift pudicity clasper.
Brevirostrines soliloquizes.
Inexactness aardwolf stunsle MOA proverbialize strangest nemophilist well-disposedness.
Demoralizers vinas feulamort twin-jet asperser.
Touchup polionotus ungamboled Hebrician hissy supertragedy aping prologulogi metisse inhiate.
Antoninianus unexperient saintship long-fleeced.
Knitting sulfurosyl rose-wreathed sporophytic rozzers subverters windmill-like butter winch macronuclear.
Intramuralism slow-legged mymarid embryotrophe.
Thermidor BITNET.
Reappraiser poinsettias mcg Gaut.
Me. halte.
Dependent Laspeyresia Shanna subdeaconry unclannishly drears Schools spitefullest wordhoard rain-bleared.
Catnapers unbilleted.
Kahikatea stick-out menaced word-of-mouth pycnogonidium close-rounded encages Lesotho Cilka.
Unwaded long-shanked salinize Dionysiacal saracens negotiator cloud-surmounting.
#!/usr/bin/perl

use strict;
use warnings;

my @words = <DATA>;
chomp @words;
my $length = 5 + 20*rand();
{ use integer; $length += 0; }

for my $line (0..$length) {
    $line and print ".\n";
    my $width = 9*rand();
    { use integer; $width++; }
    for my $word ( 0..$width ) {
        my $where = $#words * rand();
        { use integer; $where += 0; }
        my $choose = $words[$where];
        unless ($word) {
            $choose =~ /^(.)(.*)$/;
            $choose = uc($1) . $2;
        }
        $word and $choose = " $choose";
        print $choose;
    }
}
print ".\n";
__DATA__
2
1080
&c
10-point
10th
11-point
12-point
etc. for rest of English words

[download]
Update: to do: categorise and decline/conjugate by part of speech. Prioritise common words like and, the, etc. Avoid semi-duplication (renewer/renewing in above run)

In reply to First Run by TheloniusMonk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.