The reason for the appearance of the warning is that the test code does not use warnings. test.pl is run without warnings, whereas t/blah.t is run with warnings enabled. If you add use warnings to test.pl you get the same issue. It seem to me anyone that uses this module with warnings enabled is going to get this warning unless they also supress it or don't use warnings. All you need to make it go away is simple no warnings before setting @ISA for package C. This is valid as the Module requires 5.6+ For package D the second argument of @ISA is obviously not evaluated as it does not generate a warning. 

use Test;
BEGIN { plan tests => 3 };
use Class::Dynamic;
use warnings;   # added to show point

ok(1);

our $testval = time & 1;

package A; sub number { return 12 }
package B; sub number { return 42 }

package C; no warnings; @ISA = ( sub { $main::testval ? "A" : "B" } );
package D; @ISA = ( "A", sub { $main::testval ? "A" : "B" } );

package main;

ok (C->number == ($testval ? 12 : 42));
ok (D->number == 12);

[download]

cheers

tachyon

In reply to Re: Can't suppress missing package warning by tachyon
in thread Can't suppress missing package warning by Ovid

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.