while(defined($_ = $term->readline($prompt))) {
  [case statement to parse command]
}