.......
my $dsn = "dbi:$platform:$database:$host:$port";
my $connect = DBI->connect($dsn, $user, $pw);

foreach my $k(@shows_array) {
	my($show_id,$title,$next_episode) = split(/\|/,$k);
		
my $query = "SELECT count(episode) from shows where episode = \"$next_episode\"";

my $query_handle = $connect->prepare($query);

$query_handle->execute();

$query_handle->bind_columns(\$episode); {
			if($episode eq "0") {
			$get_file = "$url$title"." "."$next_episode"."&catid=$catid"."&num=".$num."&age="."$age"."&username=".$username."&".$apikey;
			#print "<br />".$get_file."<br />";
                        #THE PRINT ABOVE OUTPUTS FINE
			push(@nzb_list,$get_file);
			print @nzb_list;
			#THE PRINT ABOVE IS THE PROBLEM
                        };
			
   }
}