perl -e"print('Do I understand? (yes/no): ');my $understand=<>;my $do_ +not; $do_not='do not ' if ($understand!~/^yes/i); print($/,'If you ', +$do_not,'understand, things are such as they are.',$/)"
Do I understand? (yes/no): may be If you do not understand, things are such as they are.
In reply to Re: Zen And The Art Of Perl Poetry
by chanio
in thread Zen And The Art Of Perl Poetry
by webfiend
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |