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