foreach my $line (<$readHandle>) {