if($sign eq '-'){ do something ... }
if(not $den){ do something .... } # $den will be undefined if no denominator is found
if(length($num_ == 3){ do something ... }