print $greeting;
chomp($operator = <STDIN>);
#your other prints and stuff here
$c = $a - $b if $operator eq "-";
$c = $a * $b if $operator eq "*";