timethese 200000, {
   StjA => sub { stj_look($stj_ref, $npoints },
   StjB => sub { stj_look($stj_ref, 2*$npoints },
   StjC => sub { stj_look($stj_ref, 3*$npoints },
   ...
};