Select Code to Download

sub make_bin_ops {
  my $op = shift;
...
my $mult = make_bin_ops("*");
print $div->(2,2),"\n";
print $mult->(2,2),"\n";