I'm assuming that's all inside of a while loop you are using to read the file. Instead of printing when you match the line, store the value in a variable. Then after the while loop, print it all out.

if ($line =~ /\s*APP>\s*LumaIntraMode\s:(\w+),\suse_intrabc:(\d)/i) {
   $values{Luma_mode} = $1;
}

# etc...
[download]

Then after the loop

print "Luma Mode: ", $values{Luma_Mode}, "\n";
print "Luma Angle: ", $values{Luma_Angle}, "\n";

# etc...
[download]