in reply to Call for comments on filereadtest.pl
It looks like it was translated directly from BASIC, or maybe COBOL?