#!/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; }
In reply to Re: Re: Mantra of Reality
by shirkdog_perl
in thread Mantra of Reality
by shirkdog_perl
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |