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: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |