in reply to read multi lines of a file in perl

see $INPUT_RECORD_SEPARATOR