Re: Conditionally faking a module

[Anonymous Monk]

see use, require, eval

BEGIN {
  if( eval { require Cava::Pack; 1 } ) {
     import Cava::Pack;
  } else { 
    no strict 'refs';
    *Cava::Pack::Resource = sub { $Cava::Pack::dir . '/' . $_[0]; };

    *Cava::Pack::SetResourcePath = sub { $Cava::Pack::dir = $_[0]; };
    *Cava::Pack::GetInfoProductVersion = sub { "0.9.9.0"; };
  } ## end unless ( eval { require Cava::Pack...})
} ## end BEGIN

[wanna_code_perl]

This was the ticket. Thanks!