try...

use Acme::Tasseography;

my $at = Acme::Tasseography->new(<<ISSUE);
oooh... 2 inputs files
oooh... of size 16gb & 800mb
oooh... 4 hashes
ooohh...
oooooohhhh... around 500mb
oooooooooohhhh... it stucks
ISSUE

say $at->tell_fortune;
[download]

On my computer it says

Look at line 100...
[download]

Though, running it a second time it says

hire a consultant...
[download]