Passing arguments Hi,

I need to pass id as parameters to a subroutine

testsub(35);

sub testsub($)
   {
   my $self = shift;
   my $id = @_;
   print "$id";
}

Its printing 3 . am i going wrong in prototype .


-- 
To unsubscribe, e-mail: beginners-unsubscribe@perl.org
For additional commands, e-mail: beginners-help@perl.org
http://learn.perl.org/


