Help for this page

Select Code to Download

Select or download this

my $data = do { local $/ = undef; <INFILE> };
my %edit = split /=|\r\n/, $data;