use Silly::Die sub { qq(I died with: "@_") }; open FILE, "foo" or die trying;