$filename = (join '', (split @temp_dataŤ0])) . '.html'; #### open (INDEX, ">list.html"); #### open (CAR, ">$filename"); print CAR "Make and Model: @temp_data[0]\n"; print CAR "Color: @temp_data[1]\n"; etc.