RE: passing an argument to a subroutine

2003-09-08 Thread Mike Harrison
EMAIL PROTECTED]; [EMAIL PROTECTED] Subject: passing an argument to a subroutine Hello An argument passed to a subroutine returns wrong value. Code example: @x = (1..5); [Mike: @x = (1,2,3,4,5)] $x = @x; [Mike: $x = 5, the number of elements in @x] showValue ($x); # or showValue (\$x); [Mike: pa

Re: passing an argument to a subroutine

2003-09-08 Thread R. Joseph Newton
"B. Fongo" wrote: > Hello > > An argument passed to a subroutine returns wrong value. > > Code example: > > @x = (1..5); > $x = @x; > > showValue ($x); # or showValue (\$x); > > sub showValue { > > my $forwarded = @_; > print $forwarded; # print ${$forwarded}; > > } > > In both cases, the s

Re: passing an argument to a subroutine

2003-09-05 Thread Todd W.
"B. Fongo" <[EMAIL PROTECTED]> wrote in message news:[EMAIL PROTECTED] > Hello > > An argument passed to a subroutine returns wrong value. > > Code example: > > @x = (1..5); > $x = @x; > here, $x gets the number of elements in @x > > showValue ($x); # or showValue (\$x); > > > sub showValue {

Re: passing an argument to a subroutine

2003-09-04 Thread drieux
On Thursday, Sep 4, 2003, at 04:53 US/Pacific, Andrew Brosnan wrote: On 9/4/03 at 11:34 AM, [EMAIL PROTECTED] (B. Fongo) wrote: An argument passed to a subroutine returns wrong value. Code example: [..] In both cases, the script prints out 1. What is going on here? You are asking Perl for the numb

Re: passing an argument to a subroutine

2003-09-04 Thread Andrew Brosnan
On 9/4/03 at 11:34 AM, [EMAIL PROTECTED] (B. Fongo) wrote: > Hello > > An argument passed to a subroutine returns wrong value. > > Code example: > > @x = (1..5); > $x = @x; > > showValue ($x); # or showValue (\$x); > > > sub showValue { > > my $forwarded = @_; > print $forwarded

passing an argument to a subroutine

2003-09-04 Thread B. Fongo
Hello An argument passed to a subroutine returns wrong value. Code example: @x = (1..5); $x = @x; showValue ($x); # or showValue (\$x); sub showValue { my $forwarded = @_; print $forwarded; # print ${$forwarded}; } In both cases, the script prints out 1. What is going on here?