You need an eval, otherwise your concatenated '&Mysimple_mod::bogus' is just a string, not a function.

ok ( defined( eval $val.'::bogus' ) ,        "#6 bogus subroutine");
[download]

Update: sorry, spoke too soon. The problem with the eval is that it would actually call the routine...  See zwon's reply for a working solution.