Re: [MacPerl] Mail::Util question

["Paul J. Schinder" <schinder@pjstoaster.pg.md.us>]

Ken Pierce <kpierce@mit.edu> writes:
}Trying to run this test script
}
}------
}#! perl -w
}
}use Mail::Util qw(read_mbox);
}
}@msg = read_mbox("HD:User Files:KP:Eudora mailboxes and settings:In");
}print join("",@{$msg[$#msg]})."\n";
}------

That looks familiar :-)

}
}gives the following:
}
}--
}# Subroutine Version redefined.
}File 'HD:Applications & Utilities:MacPerl 5.1.3r2:lib:Mail:Util.pm'; Line 13
}# cannot open 'HD:User Files:KP:Eudora mailboxes and settings:In': Invalid
}argument
}
}File 'Dev:Pseudo'; Line 5
}--
}
}The path is correct, and I do have the FileHandle module.  I'm new to this
}-- what am I missing?

A FileHandle.pm without the bug that the one that ships with MacPerl has,
the bug that puts a ./ at the beginning of every path not beginning with /.
You can find a fixed one (the one I use) at
<ftp://mors.gsfc.nasa.gov/pub/MacPerl/Scripts/Fixed_Library_Routines/FileHandle.
pm>.  (mors is a Sun workstation, so remember to transfer in text mode, or
MacPerl will choke on it.)

}
}Ken Pierce


---
Paul J. Schinder
NASA Goddard Space Flight Center
Code 693, Greenbelt, MD 20771
schinder@pjstoaster.pg.md.us