for (1..$selEntry) {
        $entry = <$txtFH>;
    }