How do you test that a variable has been tied to a class?
I looked through Test::More; the term 'tie' is conspicuous by its absence. I also searched the archives of this list and couldn't locate anything.
I'm looking for something along the lines of Test::More::isa_ok that we could use like this where the 'tie' call does not (at least in normal practice) explicitly return an object:
use Tie::File; tie @data, 'Tie::File', $file or die; is_tied(@data, $file, "[EMAIL PROTECTED] is tied to \$file");
Jim Keenan