Jeff Westman wrote:
>
> Are there 'aliases' in perl?  For example, if I have a Korn shell script and
> a function named "increaseCost()", I can do this:  "alias
> decreaseCose=increaseCost" (passing a parameter in)..... of course this is a
> simplified example of what I want to do, but the point is to make it
> self-documenting.
>
> Maybe what I need is a "reference" ?

I'm not clear what you want to do Jeff. Is it something like this?

  my $cost;

  sub increaseCost {
    my $delta = shift;
    $cost += $delta;
  }

  sub decreaseCost {
    my $delta = shift;
    increaseCost(-$delta);
  }

In which case you should write it exactly this way and forget
about aliases. If I'm guessing wrongly then let us know.

Cheers,

Rob



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to