use strict;
use English;
my $INPUT_RECORD_SEPARATOR = "%";  # Hi, mom! They tell me to use strict and 'my' my variables!