RE: following threads via mail headers
Try Mail::Audit by Simon Cozens. http://search.cpan.org/doc/SIMON/Mail-Audit-1.11/Audit.pm Scot Robnett inSite Internet Solutions [EMAIL PROTECTED] -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of Kuhnibert Sent: Friday, December 07, 2001 12:35 PM To: perlwin32 Subject: Re: following threads via mail headers reposted, apparently there was a list problem .. > > hello folks, > > both outlook and netscape messanger (and probably many other mail clients) > have a facility to follow threads, that is, if you send out a mail and > receive multiple replies on this mail you can see all mails belonging to > this thread linked to each other. i don't know how this works exacactly, > there's an item "References:" in the mail-header which appears to be linked > to this facility - howevery even when lacking this attribute the client > still finds mail which are (or better might be) related to each other, maybe > by means of the subject! anyway, what i want to do is to fetch mails from a > pop3 account vie perl and automagically put mails which belong to each other > in a separate folder of their own (i.e. bascially the same analysis the am > mail clients are performing, just with a different reaction). any perl > module which dealt with this before? > > TIA > till > > ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.303 / Virus Database: 164 - Release Date: 11/24/2001 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.303 / Virus Database: 164 - Release Date: 11/24/2001 ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Re: Access IE History data
Hi Chuck, - Original Message - From: <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Wednesday, December 05, 2001 8:46 AM Subject: Access IE History data Does anyone know of a way to get the History data for a specific user under NT4.0? You can view it in explorer, but if you go to the same directory in > a DOS window you just see a file called index.dat - which I assume is some > kind of binary data file. Has anyone tried to pull info out of it before? > or do you know how MS is showing it in explorer? The MS way is with interfaces. Here is a VB sample: http://www.domaindlx.com/e_morcillo/scripts/type/default.asp?page=inet#hist To do it in Perl would require a small miracle, unless you could wrap the above approach in COM and use Win32::OLE hth, Mark Pryor ICQ 64329574 Pgp KeyID: 0x1A966EC5 > > Thanks, > > Chuck > > ___ > Perl-Win32-Users mailing list > [EMAIL PROTECTED] > http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Re: define long directory name with short parameters
Raj Subedi wrote:
> Hi,
>
> I am trying to prepare setup file in active perl
> running under Windows 2000.
> I want to define long directory name with short
> parameter as below.
>
> $MAIN = "/somedir/maindirname";
>
> $DATADIR = "$MAIN/data" ;
> $TMPDIR = "$MAIN/temp" ;
> $GIFDIR= "$MAIN/gif" ;
>
>
> then how can I export these parameter so that I can
> use in my scripts directly. I found we can do this
> in unix as below.
>
> export MAIN DATADIR TMPDIR ;
When you export them, they would only apply to children of the script
since you can't set a global env vrbl (on UNIX).
I would just set them into %ENV and they should be inherited by
any children you run.
$ENV{DATADIR} = "$MAIN/data";
--
,-/- __ _ _ $Bill Luebkert ICQ=14439852
(_/ / )// // DBE Collectibles Mailto:[EMAIL PROTECTED]
/ ) /--< o // // http://dbecoll.tripod.com/ (Free site for Perl)
-/-' /___/_<_http://www.todbe.com/
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
RE: Scrolling text - new question
Did you try tkweb, one of the Perl/Tk sample apps? > -Original Message- > From: Martin Moss [mailto:[EMAIL PROTECTED]] > Sent: Thursday, December 06, 2001 6:11 AM > To: Perl-Win32-Users Mailing List > Subject: RE: Scrolling text - new question > > > All, > > after some excellent help from Ron Hartika and a few others, > I need some > further advice from you all. > Is it possible to write a TK app that contains a browser > window that I can > write html to. > > Not just because I could do the scrolling text in javascript > and it would be > less jerky, but also because I may need to display html documents, but > specifically without opening a seperate browser. > > Regards > > Marty > > ___ > Perl-Win32-Users mailing list > [EMAIL PROTECTED] > http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users > ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Re: Help POD usage
Hi Dick, "Dick Penny" <[EMAIL PROTECTED]> wrote: > I give up! Am trying to be self-sufficient because there is so much > documentation, BUT how do you get at it? I cannot find a single example > in Perl User Guide of how to get POD to cough up it's goodies. > Everything I find seems to assume one wants to get at PODstuff by > executing some Perl script and doing POD:: blah, blah blah. > > I'd like to type something in at command prompt like: > 1) perlpod -h (or perlpod.pl -h) #expect to see allowable arguments > to a perlpod script > 2) perl perlpod PPM #expect to get all documentation for PPM display on > my screen you were so close. try: perldoc perlpod > 3) something zip #expect to get all docs of scripts relating to zip > files well perldoc only searches your *installed* modules, and only by name. but CPAN has lots of code to give you zip-file handling: http://search.cpan.org/search?mode=module&query=zip > ... I've been to CPAN, but the installation processes are not > fathomable (eg. archive-zip-0.11). In my opinion, there is absolutely no > need for "make" files in a scripting world where one only downloads > scripts and/or binaries. > > Any words of wisdom appreciated. > Dick the make process of installing perl modules is only "required" when the module you're installing has C source code components that need to be compiled for the target platform at install-time. the reason it's recommended in every module's docs is because make is very good at figuring out what platform you're running on, where your perl binary is, where your PERL5LIB directory is and where your docs should go. but if you're not insterested in finding and installing a make binary, The CPAN FAQ http://cpan.org/misc/cpan-faq.html#How_install_Perl_modules mentions a couple of the more user-friendly methods such as the CPAN module itself which is present on most perl distributions (and can install any CPAN module for you) and of course ActiveState's own PPM (perl package manager) which can snarf and setup whatever ActiveState supports. hth, -dave ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Getting Perl to fill in requested data for a dos program
Hi, I'm trying to get perl to give input to a dos program. Here's a description of what I want it to do: 1. I want to have perl kick off a dos program that doesn't accept command line parameters. 2. The Dos program, that perl will have started, will then prompt the user for input like "Enter Name:" 3. I want Perl to fill in what the program is asking for on the screen, and then send a carriage return. Any ideas? Thanks in advance, Jeff ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
2nd msg re users list
did prior message go, my eMail window went crazy. Is users list still up and running? Have not rec'd messages for 2 days whereas I was getting 20-30 per day?? ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Download a file from the web
I am writing a perl script that converts various documents and even websites to text and emails it back to the sender. I have been succesful with converting websites that have Office documents in the url (e.g. http://www.somesite.com/worddocument.doc), however I am not successful with converting urls with pdf files in them. I know I can convert them to text once I have them on my hard drive, but how can I download a PDF file from a website (e.g. http://www.somesite.com/MYfile.pdf)? Any help would be greatly appreciated. Thanks in advance. Brian ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Re: Help POD usage
Dick Penny wrote: > I give up! Am trying to be self-sufficient because there is so much > documentation, BUT how do you get at it? I cannot find a single example > in Perl User Guide of how to get POD to cough up it's goodies. > Everything I find seems to assume one wants to get at PODstuff by > executing some Perl script and doing POD:: blah, blah blah. > > I'd like to type something in at command prompt like: > 1) perlpod -h (or perlpod.pl -h) #expect to see allowable arguments > to a perlpod script > 2) perl perlpod PPM #expect to get all documentation for PPM display on > my screen > 3) something zip #expect to get all docs of scripts relating to zip > files Look in your bin dir and you will see perldoc.bat - give that a try. I prefer to combine the base pods into a single text file and use vim to search it. Script to do so is on my Tripod site. > This isn't my real problem. It is me trying to learn how to work with > .zip files. I've been to CPAN, but the installation processes are not > fathomable (eg. archive-zip-0.11). In my opinion, there is absolutely no > need for "make" files in a scripting world where one only downloads > scripts and/or binaries. CPAN was designed with the UNIX community in mind. Use PPM from the Activestate site if you can't fathom CPAN. If it's not on AS site, then you're in trouble. :) > Any words of wisdom appreciated. Buy low - sell high. :) -- ,-/- __ _ _ $Bill Luebkert ICQ=14439852 (_/ / )// // DBE Collectibles Mailto:[EMAIL PROTECTED] / ) /--< o // // http://dbecoll.tripod.com/ (Free site for Perl) -/-' /___/_<_http://www.todbe.com/ ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
List Problems??
I'm on 4 Active State mailing lists and haven't received any mail in about 2 days. Is Active State having problems? Mark Edwards System & Network Operations FutureSourcingTM Compaq Computer Corporation ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
Re: How do I add a directory to my include path at compile time?
Before you go too far, I suggest you type the following at a command-line prompt: perl -e "print join(qq|\n|,@INC),qq|\n|;" [EMAIL PROTECTED] All opinions are my own and not necessarily those of my employer On Tue, 4 Dec 2001, Walter Usyk wrote: > I have compiled Perl 5.6.1 on Windows NT . When i run perl -V I only > see the /perl/5.6.1/lib path in the @INC array. I need to add also the > /perl/5.6.1/site/lib path to @INC. I know that I need to recompile (I do > > not want to set PERLLIB or any other env variable). How do I modify the > win32/Makefile so that when I recompile perl it adds the > /per/5.6.1/site/lib directory to @INC. > > Thanks for your help > > -- > Walter Usyk - Tools Developer > Software Development Environment Tools (1P67) > email: [EMAIL PROTECTED] > ESN: 398-4603 > Tel: (613) 768-4603 > > > ___ > Perl-Win32-Users mailing list > [EMAIL PROTECTED] > http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users > ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
RE: dynamic variable evaluation
Then I assume you know at the time that the various values need to
be shown which variables are involved. I suggest that you think of
your "reference hash" as a simple perl format string and use sprintf
or printf to use the pre-determined format string to produce the
required output. Perhaps I'm assuming too much. Do you know the
order and identity of the variables to be shown? If not then an approach
that you could take would be that the information stored in the
reference hash would be an entire sprintf or printf or prehaps
just a plain print sent with the variables escaped as you are
currently doing. Then all you have to do is to eval() the hash value.
For example if:
hashfmt{'1'} = "abc, 123, \$hash{\$x}{\$y}{'value'}, xyz, 345,
\$hash{\$x}{\$y}{'value2'}" ;
Then all you would do is:
eval ("print $hashfmt{'1')");
Or if you really wanted to process the individual items separatly
you sould have code like:
$count=1;
foreach $item (@values) {
if ($count % 3 == 0) {
$_=$item;
eval("\$item=$_;");
}
print "Item = [$item]\n" :
$count++ ;
}
*** [EMAIL PROTECTED]
All opinions are my own and not necessarily those of my employer
On Tue, 4 Dec 2001, Ed DeBus wrote:
>
> Thanks all for the responses. I think I may need to explain the code
> further.
>
> First, and most important, let's call the reference hash a "formatting" hash
> insteadthis hash and it's values has nothing to do with perl references.
>
> I think the problem I'm having is that the formatting hash is defined
> immediately when the scripts starts, and it's format never changes, however,
> the variables (hash values) represented by the formatting hash constantly
> change. If the variables represented in the formatting hash exist prior to
> the hashes keys/values being definded, then of course this works fine.
> However once on of the variables "refererneced" (not a perl reference) in
> the format hash change, that does not force the value of that variable in
> the format hash to change.
>
> Yes, I could refer to the variables I want directly when I need them. The
> purpose for this is to be able to build a template that creates the
> formatted message I need when I need it (there are several hundred potential
> unique messageshence the desire to build them dynamically from a
> template).
>
> Thanks!
>
>
> Ed DeBus
>
> -Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED]]On Behalf Of Ron
> Hartikka
> Sent: Tuesday, December 04, 2001 8:29 AM
> To: Ed DeBus; [EMAIL PROTECTED]
> Subject: RE: dynamic variable evaluation
>
>
> You took some extra references; I removed some backslashes: seem method 'a'
> below.
>
> (If you really had to convert the substring \$hash{\$x}{$y}{'value'} to a
> reference, you'd need to use eval()'.
>
> But, I think you ought to look at method 'b' below ...
>
> $x = 'xval'; $y = 'yval';
>
> $hash{$x}{$y}{'value'} = 'worked';
> $hash{$x}{$y}{'value2'} = 'not worked';
>
> # method a
>
> $hashfmt{'1'} = "abc, 123, $hash{$x}{$y}{'value'}, xyz, 345,
> $hash{$x}{$y}{'value2'}" ;
> @values = split(/, |,/ ,$hashfmt{'1'}) ; # note I switch alternatives
>
> print "a: $values[2], $values[5]\n";
>
> # method b
>
> @values = ('abc', 123, $hash{$x}{$y}{'value'}, 'xyz', 345,
> $hash{$x}{$y}{'value2'});
> print "b: $values[2], $values[5]";
>
> ... prints
>
> a: worked, not worked
> b: worked, not worked
>
>
> > -Original Message-
> > From: [EMAIL PROTECTED]
> > [mailto:[EMAIL PROTECTED]]On Behalf Of Ed
> > DeBus
> > Sent: Tuesday, December 04, 2001 2:27 AM
> > To: [EMAIL PROTECTED]
> > Subject: dynamic variable evaluation
> >
> >
> >
> > Given the following scenario, is there a clean way to perform variable
> > substitution
> >
> > First, we have a 3 dimensional hash:
> >
> > $hash{$x}{$y}{'value'} = "it worked" ;
> > $hash{$x}{$y}{'value2'} = "didn't work" ;
> >
> >
> > And another "reference" hash (nothing to do with perl ref's, but
> > rather for
> > building an array dynamically)
> >
> > $hashfmt{'1'} = "abc, 123, \$hash{\$x}{$y}{'value'}, xyz, 345,
> > \$hash{\$x}{\$y}{'value2'}" ;
> >
> >
> > Now build an array dynamically using format defined by the
> > "reference" hash.
> >
> > @values = split(/,|, / ,$hashfmt{'1'}) ;
> >
> > $count=1 ;
> > foreach $item (@values) {
> > ?< do what here> if ($count % 3 == 0) ;
> > print "Item = [$item]\n" :
> > $count++ ;
> > }
> >
> >
> > The problem I have is getting every 3ed item in the array (array position
> > 2,5, etc.) to evaluate and return a value of "it worked" or "didn't work".
> > The reference hash format(s) are configured when the script starts and
> > remain static from that point forward. It's probably obvious, but keys to
> > the 1st and 2nd dimensions of the "reference" hash are passed as variables
> > from a calling subroutine. Probably important to al
Access IE History data
Does anyone know of a way to get the History data for a specific user under NT4.0? You can view it in explorer, but if you go to the same directory in a DOS window you just see a file called index.dat - which I assume is some kind of binary data file. Has anyone tried to pull info out of it before? or do you know how MS is showing it in explorer? Thanks, Chuck ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
