Help for this page
open (Mer, "Extracted.c");
open (MER, "Extracted.c") || die "open: Extracted.c - $!\n";
while (<MER>) { # do stuff }