Create 4_extract.pl