#!/usr/bin/env perl

use Text::Lorem;

my $text = Text::Lorem->new();
$paragraphs = $text->paragraphs(10);

print $paragraphs;

 tr -dc a-z1-4 </dev/urandom | tr 1-2 ' n' | awk 'length==0 || length>50' | tr 3-4 ' ' | sed 's/^ *//' | cat -s | sed 's/ / /g' |fmt

lorem-ipsum-generator -p 10 -l

info bash -o -|shuf -n50|sed 's/  */ /g;s/^ //'|fmt -w 90

#!/usr/bin/bash
base64 /dev/urandom | awk '{print(0==NR%10)?"":$1}' | sed 's/[^[:alpha:]]/ /g' | head -$1 | awk '{ print NR,$0 }'

#!/bin/bash
file=$HOME/lib/text/lorem_ipsum && cat $file