#Populate @traffic_file_list
while (my $file = readdir(DIR)) {
	if($file =~ $prompt_host) { 
		push(@traffic_file_list, $file);
	}
}