http://www.perlmonks.org?node_id=802305

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 +.