if ($operator eq "-")
{
  $c = $a - $b;
} else {
  $c = $a * $b;
}