mjd-perl-pm on Mon, 6 Mar 2000 22:53:41 -0500 (EST)


[Date Prev] [Date Next] [Thread Prev] [Thread Next] [Date Index] [Thread Index]

Re: Funky code thing


>             last if (my $cp = index  $t, $c)      < 0;
>             last if (my $op = rindex $t, $o, $cp) < 0;
>
> There are at least four features of note:

Oh, one more: Abigail said that one would probably be able to do it in
one line, by doing something like

           my $op = rindex $t, $o, (my $cp = index  $t, $c);

but I think it would be hard to get the error checing in there without
making it look super-nasty.

**Majordomo list services provided by PANIX <URL:http://www.panix.com>**
**To Unsubscribe, send "unsubscribe phl" to majordomo@lists.pm.org**