Help for this page

Select Code to Download

Select or download this

sub p1 { print $_[0]} p1($tied_array[0]); # calls FETCH
sub p2 { $_[0] = 0 }  p2($tied_array[0]); # calls STORE