Mantra of Reality

#!/usr/bin/perl -w
use strict;

my $life  = "Moment in time\n";
my $age   = 25;
my $death = 100;

do { print $life; $age++;} until $age == $death;
[download]

Comment on Mantra of Reality Download Code

Replies are listed 'Best First'.
Re: Mantra of Reality by webfiend (Vicar) on Feb 24, 2003 at 20:14 UTC
.. And if you're one to go with reincarnation: `#!/usr/bin/perl -w use strict; my $life = "Moment in time\n"; LIFE: { my $age = 25; my $death = 100; do { print $life; $age++; } until $age == $death; next LIFE; }` [download] I just realized that I was using the same sig for nearly three years.	[reply] [d/l]
Re: Re: Mantra of Reality by shirkdog_perl (Beadle) on Feb 24, 2003 at 21:00 UTC
For those who live life on the edge... `#!/usr/bin/perl -w use strict; my $life = "Sex, Drugs, & Rock 'n Roll\n"; LIFE: { my $age = 25; my $death = 100; my $drugs = 5; do { print $life; $age += $drugs; } until $age == $death; next LIFE; }` [download]	[reply] [d/l]