BEGIN {
   for my $dep (@deps) {
      /^\w+(?:::\w+)*\z/
         or die("Invalid");

      eval("use $dep; 1")
         or die($@);
   }
}