dh_*: Prefer 3-arg open

Signed-off-by: Niels Thykier <niels@thykier.net>

1 files changed, 4 insertions, 3 deletions

diff --git a/dh_md5sums b/dh_md5sums
index b0cf0b63..c720b11c 100755
--- a/dh_md5sums
+++ b/dh_md5sums
@@ -63,13 +63,14 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
 	my $exclude="";
 	if (! $dh{INCLUDE_CONFFILES} && -r "$tmp/DEBIAN/conffiles") {
 		# Generate exclude regexp.
-		open (CONFF,"$tmp/DEBIAN/conffiles");
-		while (<CONFF>) {
+		open(my $fd, '<', "$tmp/DEBIAN/conffiles")
+		  or die("open $tmp/DEBIAN/conffiles failed: $!");
+		while (<$fd>) {
 			chomp;
 			s/^\///;
 			$exclude.="! -path \"./$_\" ";
 		}
-		close CONFF;
+		close($fd);
 	}
 	
 	# See if we should exclude other files.