#$my_exp = myCurveX(\@my_arx,\@my_ary,\@my_arz,$my_v1,$my_v2);

#sub myCurveX(){  # thanks to [jwkrahn] (below) for pointing out my code sloppiness
sub myCurveX{  #correct.... no ()
 my ($arrayref1, $arrayref2,$arrayref3, $v1, $v2) = @_;
$arrayref1->[0] = 1;  #sets first element of @my_arx to 1