#!/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__