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

Re: [FWP] aCertainName.pm

  Hello once more,

sub index{my $p=$_[2]|0;($_="$_[0]")=~s/(.{$p,}?)$_[1].*/$1/;y///c}

  Bye again,

  Etienne

==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe