open (my $rfh, '<', $TestFile_Read) or die "Test File '$TestFile_Read' kann nicht gelesen werden : '$!'\n";