"Source-code example is left as an exercise to the reader."

OK, but it's untested:

#!/usr/bin/env perl

package MrNatural;

use feature qw(say);
use Class::Tiny { mantra => qq(Om Anwha Tanas Siam) };

package Enlightment;

use base qw(MrNatural);
use strict;
use warnings;

my $meditation = Enlightment->new();

for ( 1 .. 10000 ) {
    say $meditation->mantra;
    sleep 5;
}
__END__
[download]