Re: [Poop-group] Disappearing sub refs in Class::Trigger/Class::DBI

[Tony B. <to...@ka...>]

On Tue, Oct 22, 2002 at 03:30:40PM -0400, Barry Hoggard wrote:
> No, I wasn't using anything complicated at all, no Inline stuff.  It 
> was basically a textbook example of a Class::DBI object, with one or 
> two triggers to load some additional data.
> Lots of print statements were what I resorted to before I gave up.

OK ... I've got this down as far as the line:

     {   if(my $in = IO::File->new($filename, "r"))
         {    $out->print($_) while <$in>;

in Mail::Box.[1]

If I change that 'while' to a 'foreach', everything works! (I presume
because the entire file gets slurped in advanced)

Otherwise every time around the loop it the before_create trigger gets
set to the contents of the current line read from the file!!


Tony

[1] Unfortunately this is with an unreleased beta of Mail::Box with an
unreleased beta of Class::DBI, so it's hard to get a simple test case
everyone can use :(