"I did it..."

my $way;

Update: Or if needing a song lyric (er... spam?) generator, here is a quick prototype, which serves very roughly to inspire if perhaps not completing the job as yet. (Maybe a later version?)

    open ALL, '</usr/share/lib/dict/words';

    my @stuffed = <ALL>;
    chop @stuffed;
    my $blurt = '';

    # sentence size 3 .. 15

    for ( my $ss = 3 + ( 13 * rand() ); $ss > 0; $ss-- ) {

        my $pick = $stuffed[ ( $#stuffed )* rand() ];
        $blurt .= "$pick ";
    }

    chop $blurt;

    print "$blurt.\n";
[download]

Output:

run 1) abhorrent befogging sloven Dudley Tristan Bernadine Kelly hardhat satan spectrogram.

Update 2) wham north tail glue.

Update 3) "Anderson signify Hepburn pile humane."