Thanks all!

BillKSmith's method works nicely, However, with NetWallah's, method the altered value of $/ is still visible to the subroutine called inside the main reading loop (reader::firstline).

Reinstateing with local the value of $/ inside the subroutine also works, but I guess it is not a standard precuation in most modules