Select Code to Download

if ( my $line = readline( $self->{file_handle} ) ) {
    return $line;
} else {
    return;
}

if (defined(my $line = readline( $self->{file_handle} ))) {
    return $line;
} else {
    return;
}