Select Code to Download

#! /usr/bin/perl
#
...
         print "$KEY_2 : Did not match\n";
    }
}

Here is the output of the script when you run it
john : Did not match
Paul : Matched
marie : Did not match