Well, for a start, you have a spelling mistake in there... my $retun_me = shift; - probably should be - my $return_me = shift;
Secondly, what exactly are you trying to do with this code ? I don't know too much about perl, but I think the assignment: @_ = @arr; ....might be a little suspicious. I normally grab the arguments passed to my sub routine from @_ , I don't usually assign *to* it. In the end, it seems like this subroutine should return the first value in @arr, which is 0. Does any of this help ? -----Original Message----- From: Bruce Ambraal [mailto:[EMAIL PROTECTED]] Sent: 20 February 2002 14:38 To: [EMAIL PROTECTED]; [EMAIL PROTECTED] Subject: What is the value of @_4_[0], and $return_me? (see below) Hi 1. (see subject) 2. Explain lines 3 , 4 3.Why does'nt this coding return anything2 sub routine { my @arr = (0, 'a' 1, 'b'); @_ = @arr; my $retun_me = shift; return( $return_me ) }; -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
