Re: Perl subroutines

> I'm working on a perl script, and I have a lot more experience in ruby
> than I do in perl. As far as I can tell there is no way to explicitly
> define arguments for a subroutine in perl, for example
>
> sub addNums(number1, number2) {
> sum = number1 + number2;
>
> return sum;
> }
>
> rather than
>
> sub addNums {
> number1 = shift;
> number2 = shift;
> sum = number1 + number2;
>
> return sum;
> }
>
> is there anyway to do this, and if not does anyone have some advice on
> a way to make this a bit more readable in perl?

It's been a while since I programmed in perl. I currently use python
after going through a long ruby phase.

However, I think the canonical way to do it is:

sub addNums($$) {
my ($number1, $number2) = @_;
my $sum = $number1 + $number2;

return $sum;
}

-Dale
---------------------------------------------------
PLUG-discuss mailing list - PLUG-discuss@lists.plug.phoenix.az.us
To subscribe, unsubscribe, or to change your mail settings:
http://lists.PLUG.phoenix.az.us/mailman/listinfo/plug-discuss