#                                                                    -*-perl-*-$description = "The following test creates a makefile to verifythe ability of make to strip white space from lists of object.\n";$details = "The make file is built with a list of objects that contain white spaceThese are then run through the strip command to remove it. This is thenverified by echoing the result.\n";open(MAKEFILE,"> $makefile");# The Contents of the MAKEFILE ...print MAKEFILE <<'EOMAKE';TEST1 := "Is this TERMINAL fun?                                                               What makes you believe is this terminal fun?                                                                                                                                               JAPAN is a WONDERFUL planet -- I wonder if we will ever reach                                         their level of COMPARATIVE SHOPPING..."E :=TEST2 := $E   try this     and		this     	$Edefine TEST3and these	        test outsomeblank linesendef.PHONY: allall:	@echo '$(strip  $(TEST1) )'	@echo '$(strip  $(TEST2) )'	@echo '$(strip  $(TEST3) )'space: ; @echo '$(strip ) $(strip  	   )'EOMAKE# END of Contents of MAKEFILEclose(MAKEFILE);&run_make_with_options($makefile,"",&get_logfile);$answer = "\"Is this TERMINAL fun? What makes you believe is this terminal fun? JAPAN is a WONDERFUL planet -- I wonder if we will ever reach their level of COMPARATIVE SHOPPING...\"try this and thisand these test out some blank lines";&compare_output($answer,&get_logfile(1));&run_make_with_options($makefile,"space",&get_logfile);$answer = " \n";&compare_output($answer,&get_logfile(1));1;