Jim,
"test" in what sense? Is this supposed to be a module like Test::More
or Test::Deep which builds on Test::Builder and which will ultimately
generate an 'ok'? If so, what does the interface for that look like?
It'll look like this: (in a Test::Unit::TestCase subclass)
my $fh = CGI::Filehandle->new_tie('/var/www/testdata/MA/qc_report1');
CGI->param('file', $fh);
...
#Invoke CGI processing
...
my $filename = CGI->param('file');
my $firstLine = <$filename>;
$self->assert_equals($filename, 'qc_report1');
$self->assert_equals($firstLine, "QC report header"):
Hmmm. I read in the docs on IO::WrapTie:
"This is currently Alpha code, released for comments."
How would your module react if IO::WrapTie's code changed significantly
between alpha and beta?
I don't expect it to change much, because it's doing one very specific
thing in a very straightforward way.
Simon
--
Simon (Vsevolod ILyushchenko) [EMAIL PROTECTED]
http://www.simonf.com
Terrorism is a tactic and so to declare war on terrorism
is equivalent to Roosevelt's declaring war on blitzkrieg.
Zbigniew Brzezinski, U.S. national security advisor, 1977-81