if ($line =~ /$key/)
            {
                $line =~ s/$key/$headers{$key}/;
                last;
            }