--- pidl/pidl.orig	2015-12-17 22:15:54.056094416 +0000
+++ pidl/pidl	2015-12-17 22:16:11.261480226 +0000
@@ -604,7 +604,7 @@
 		require Parse::Pidl::IDL;
 
 		$pidl = Parse::Pidl::IDL::parse_file($idl_file, \@opt_incdirs);
-		defined @$pidl || die "Failed to parse $idl_file";
+		defined $pidl || die "Failed to parse $idl_file";
 	}
 
 	require Parse::Pidl::Typelist;