Apologies to Lao Tzu & Stephen Mitchell
#
# Tao Te Ching
#
# By Lao Tzu
#
# Translated By Stephen Mitchel
+l
#
# Chapter 79
#
sub Failure { # Failure is an opportunity.
print 'Blame';} # If you blame someone else,
while (1){print 'Blame';} # there is no end to the blame.
#
sub Master { # Therefore the Master
my $Obligation++; # fulfills her own obligations
my $Mistakes--; # and corrects her own mistakes
+.
do {my $Needed++} until (my $Done); # She does what she needs to do
my $Others = 0;} # and demands nothing of others
+.