Try changing your 'quotes' to "double quotes" in the open.
> -----Original Message----- > From: Humberto Rodriguez [mailto:[EMAIL PROTECTED] > Sent: Monday, March 14, 2005 12:27 AM > To: perl-unix-users@listserv.ActiveState.com > Subject: [Perl-unix-users] Accessing mail from the web > > > Dear gurus: > > I have for some time, run a Unix server: > Red Hat Linux Release 9 (Shrike) > Kernel 2.4.20-6 on an i686 > with Sendmail and Procmail V. 3.22 2001-09-10 > and Perl v. 5.8.0 > > The system files for email are at /var/spool/mail > > I am trying to implement some sort of webmail, that is, to > access the emails from a webpage. The web server and the mail > server are in the same computer. > > I read through many of the available modules and found that I > could access the messages well with > Mail::POP3Client > but it does not handle MIME messages with entities. > I found Mail::Folder which seems to do what I want, but I don't > seem to be able to make it run. Since it dislikes the system > files at /var/spool/mail, I am testing with some emails I moved > to a folder called mail in the root directory of a user; I > chmodded both the directory and the two files in it, hrfc and > humberto, as 777 to test; but still, I am not able to create > the object. > > I will be grateful for any hints. > > Here is the code snippet that does not work: > > #!/usr/bin/perl -w > # folder.cgi > > use strict; > use lib '/path/to/cgi-bin/webmail/modules'; > use Mail::Folder; > > print "Content-type: text/html\n\n"; > my ($folder_type, $folder_name, $folder, $file, %options); > $folder_type = 'Mbox'; > $folder_name = '/path/to/mail'; > $file="$folder_name/hrfc"; > $options{DefaultFolderType}=1; > $folder= new Mail::Folder('$folder_type', '%options'); > #print "\$folder is $folder<br>"; > $folder->open('$folder_name'); > my $num=$folder->qty; > print "there are $num messages<br>"; > > Since the object is not being created, I get the following > error message: > [Sun Mar 13 21:56:52 2005] [error] [client 10.6.1.29] Can't > call method "open" on an undefined value at /path/to/cgi- > bin/webmail/folder.cgi line 16. > > TIA for any help, or info on a better way to do this. > > Humberto Rodriguez > > _______________________________________________ > Perl-Unix-Users mailing list > Perl-Unix-Users@listserv.ActiveState.com > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs > > > > __________________________________________________________ > This message was scanned by ATX > 10:43:05 PM ET - 3/13/2005 > _______________________________________________ Perl-Unix-Users mailing list Perl-Unix-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
