while (defined($filename = $term->readline('>'))) {