while (my $line_holder = <FILE>) {
  foreach etc...

##</code><code>##

while(<FILE>){
    my $line_holder = $_; #GOTCHA
    foreach my $val(@lines){