[23923] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 6124 Volume: 10

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Feb 12 18:06:03 2004

Date: Thu, 12 Feb 2004 15:05:08 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)

Perl-Users Digest           Thu, 12 Feb 2004     Volume: 10 Number: 6124

Today's topics:
    Re: Alternative to Export for constants (Jay Tilton)
    Re: Comparing a string to filenames in a directory <glex_nospam@qwest.invalid>
    Re: Debian Linux Perl installation (testing dist) <emschwar@pobox.com>
    Re: Debian Linux Perl installation (testing dist) <gnari@simnet.is>
    Re: Debian Linux Perl installation (testing dist) <tassilo.parseval@rwth-aachen.de>
    Re: dereferencing problems <pinyaj@rpi.edu>
    Re: dereferencing problems <usenet@morrow.me.uk>
    Re: Forgetting how to use vec <ddunham@redwood.taos.com>
    Re: Forgetting how to use vec (Anno Siegel)
    Re: Include data in a perl program? <me@privacy.net>
    Re: Just curious: perl + C + asm, any? <bik.mido@tiscalinet.it>
    Re: Optimization request <dwall@fastmail.fm>
        parsing out all data between two words with multiple in (KP)
    Re: parsing out all data between two words with multipl <usenet@morrow.me.uk>
    Re: perl 'sendmail' equivalent in windows (KK)
    Re: perl 'sendmail' equivalent in windows <usenet@morrow.me.uk>
    Re: Perl Sockets Parent/Child Problem <kenbrow@bellsouth.net>
        Problems with version 5.8.0 on OS/2 (David Smith)
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: Thu, 12 Feb 2004 20:48:44 GMT
From: tiltonj@erols.com (Jay Tilton)
Subject: Re: Alternative to Export for constants
Message-Id: <402be429.63460212@news.erols.com>

kj <kj345@lycos.com> wrote:

: One thing that bugs me about the Export module is that even when
: you want the module to export everything, one still has to register
: things in @EXPORT.  I find it particularly annoying in cases when
: I have a module that contains only constants to be shared by other
: modules and scripts, like this:
: 
: # file My_Constants.pm
: package My_Constants;
: use base 'Exporter';
: our @EXPORT = qw(FOO BAR ... );
: use constant FOO => 1;
: use constant BAR => 4;
: # etc.
: 1;

If your complaint is about having to maintain the constants and the
@EXPORT array in parallel, you could do:

    my %c;
    BEGIN {
        %c = (
            FOO => 1,
            BAR => 4,
        );
    }
    use constant \%c;
    use base 'Exporter';
    our @EXPORT = keys %c;

: Instead, I think I would prefer to do something like this:
: 
: # file My_Constants.pm
: package My_Constants;
: use constant FOO => 1;
: use constant BAR => 4;
: # etc.
: 1;
: 
: # file some_script.pl
: use My_Constants;
: 
: our $Const = bless \{ my $c }, 'My_Constants';
                     ^^^^^^^^^^
What's that "my $c" thing in the anonymous hash supposed to be?

Why are you taking a reference to that anonymous hash?

You don't need to bless anything.  Just " $Const = 'My_Constants'; "
will work just fine for what you're doing.

: printf "%d %d\n", $Const->FOO, $Const->BAR;
: 
: It works, though I've never thing anything like this done.  Is
: there anything particularly wrong with it?

Nothing really wrong with it, except it's rather noisy.

Does prefacing every constant name with "$Const->" really save work over
setting up the module to export them?

Does writing "$Const->FOO" give significant benefit over writing
"My_Constants::FOO" ?  I can see it being useful for swapping out one
set of constants for another by changing the value in $Const, but I
can't see needing that capability very often.



------------------------------

Date: Thu, 12 Feb 2004 14:41:14 -0600
From: "J. Gleixner" <glex_nospam@qwest.invalid>
Subject: Re: Comparing a string to filenames in a directory
Message-Id: <KxRWb.144$t23.32350@news.uswest.net>

nj_perl_newbie wrote:
> Okay, this is what I ended up with:
> 
> I get some warnings when it is run and I am still not able to run it
> in "Taint mode", but it is moving the file.  I am not receiving
> e-mails so I don't think that the call to &mail is working properly. 
> Any thoughts?

Since you're not getting "mail", it's obviously the call to mail() (note 
the absence of &) isn't working.  Since you don't provide that code or 
test what mail() returns, who knows.


------------------------------

Date: Thu, 12 Feb 2004 12:42:20 -0700
From: Eric Schwartz <emschwar@pobox.com>
Subject: Re: Debian Linux Perl installation (testing dist)
Message-Id: <etoekt0nkyr.fsf@fc.hp.com>

bill <nomail_nospam@nopain.nopain.com> writes:
> I have three questions for anyone knowledgeable about Linux Debian's
> Perl installation.
>
> The first question is, how can I change the Configure parameters
> that apt-get or dpkg -i use?  The default installation (at least
> for the testing distribution) has these values, which I don't
> entirely agree with:

I think you're confused; the bits you cite are from Perl's
configuration, not dpkg or apt-get's.  Debian is based on binary
packages; if you don't like them, you may compile your own (but then
you miss out on the automatic dependency tracking that Debian does for
you).

> My second question has to do with the default installation's library
> directory structure.  Mine (again, testing distribution) has library
> files in
>
> /usr/lib/perl/5.8.2/
> /usr/lib/perl5
> /usr/local/lib/perl/5.8.2/
> /usr/share/perl/5.8.2/
> /usr/local/share/perl/5.8.2/
> /usr/share/perl5
>
> What's up with lib vs. share?

See FHS.  /usr/share is for arch-independent stuff that can be shared
among many different types of machines.  /usr/lib is for
arch-dependent stuff (i.e., XS modules).  Debian doesn't touch
/usr/local, except to provide the directory hierarchy for you to put
local modules there if you like.

>  And perl/5.8.2 vs. perl5?  What's
> the rationale for breaking things up this way?  Why not just a
> single perl/5.8.2 directory, or at most /usr/lib/perl/5.8.2 and
> /usr/local/lib/perl/5.8.2 (with corresponding arch-dependent
> directories)?

Did you read the Debian Perl policy?  There are reasons for that, and
debian-perl@lists.debian.org is more likely to get you answers than
clpm.  Short answer: perl/5.8.2 is for core modules provided with
5.8.2 and perl5/ is for "other" modules that theoretically don't care
which version of Perl they're used with, as long as it's 5.something.

Full policy is at:
http://www.debian.org/doc/packaging-manuals/perl-policy/

debian-perl archives are at:
http://lists.debian.org/debian-perl/

> My third question has to do with the location of auto subdirectories
> and other architecture-dependent stuff.  It appears that Debian's
> default is to put this stuff directly in /usr/lib/perl/5.8.2/ and
> /usr/local/lib/perl/5.8.2/, instead of segregating in directories
> like /usr/lib/perl/5.8.2/some-architecture-string/ and
> /usr/local/lib/perl/5.8.2/some-architecture-string/.

Yes, because you can share /usr/share between machines of a different
architecture, but /usr/lib is defined by FHS (itself a subcomponent of
LSB) to be architecture-dependent.  I'm not a member of the Debian
Perl team, but I imagine they decided that since /usr/lib is already
arch-dependent, there's no reason to add yet another directory there.
But again, this is sheer guessing, and you'd be best off asking
debian-perl about that.

> This can lead to installation bugs (as I've posted in another clpm
> thread). 

That appears to be from trying to keep Debian's perl around while you
compile your own.  As you've noted, that's a royal PITA, but perhaps
someone on the debian-perl list might be able to help.  Normally, I'd
say just uninstall perl, but since it's in base, and a ton of other
things depend on it, you might have to install your version under /opt
or /usr/local/perl or some such.

> What's Debian's rationale from deviating from Perl's standard here?

Why don't you ask them, instead of asking here?

> Will apt-get and dpkg get hopelessly confused if
> I manually create these arch-dependent directories and move the
> auto subdirectories to them?

Probably, but you'd be better served by asking on a Debian mailing
list than a Perl one, I imagine.

-=Eric
-- 
Come to think of it, there are already a million monkeys on a million
typewriters, and Usenet is NOTHING like Shakespeare.
		-- Blair Houghton.


------------------------------

Date: Thu, 12 Feb 2004 19:33:50 -0000
From: "gnari" <gnari@simnet.is>
Subject: Re: Debian Linux Perl installation (testing dist)
Message-Id: <c0gkd7$1ij$1@news.simnet.is>

"bill" <nomail_nospam@nopain.nopain.com> wrote in message
news:c0ga9h$lhs$1@reader2.panix.com...
>
> I have three questions for anyone knowledgeable about Linux Debian's
> Perl installation.

you might want to sent these questions to one of the debian mailing lists,
debuian user or there might be a debian perl mailing list even.
they are ususally quite helpful

>
> The first question is, how can I change the Configure parameters
> that apt-get or dpkg -i use?  The default installation (at least
> for the testing distribution) has these values, which I don't
> entirely agree with:

if you do not agree with a binary distribution's setting, you use the
source.

to make sure you have all build tools installed:
    apt-get install build-essential
get the source
    apt-get source perl
now the source has been unpacked. enter the source dir,
make your changes.
and if my memory serves me:
    dpkg-buildpackage
this will create new debian packages you can install with dpkg


alternatevely, download original perl source tarball
and install as usual under /usr/local/


>
> -Dusethreads -Duselargefiles -Dccflags=-DDEBIAN -Dcccdlflags=-fPIC -Darchn
ame=i386-linux -Dprefix=/usr -Dprivlib=/usr/share/perl/5.8.2 -Darchlib=/usr/
lib/perl/5.8.2 -Dvendorprefix=/usr -Dvendorlib=/usr/share/perl5 -Dvendorarch
=/usr/lib/perl5 -Dsiteprefix=/usr/local -Dsitelib=/usr/local/share/perl/5.8.
2 -Dsitearch=/usr/local/lib/perl/5.8.2 -Dman1dir=/usr/share/man/man1 -Dman3d
ir=/usr/share/man/man3 -Dsiteman1dir=/usr/local/man/man1 -Dsiteman3dir=/usr/
local/man/man3 -Dman1ext=1 -Dman3ext=3perl -Dpager=/usr/bin/sensible-pager -
Uafs -Ud_csh -Uusesfio -Uusenm -Duseshrplib -Dlibperl=libperl.so.5.8.2 -Dd_d
osuid -des

just curious, what specifically offends you here?

>
>
> My second question has to do with the default installation's library
> directory structure.  Mine (again, testing distribution) has library
> files in
>
> /usr/lib/perl/5.8.2/
> /usr/lib/perl5
> /usr/local/lib/perl/5.8.2/
> /usr/share/perl/5.8.2/
> /usr/local/share/perl/5.8.2/
> /usr/share/perl5

the /usr/local stuff is for modules installed by you (as opposed to
from debian packages)
the /share stuff is arch independent (pure perl)

> ...
>
> This can lead to installation bugs (as I've posted in another clpm
> thread).  What's Debian's rationale from deviating from Perl's
> standard here?

debian have their own strict standards, that will usually overide the
original package's. this (usually) results in easier maintainance,
fewer depedency problems and smoother upgrades

>  Will apt-get and dpkg get hopelessly confused if
> I manually create these arch-dependent directories and move the
> auto subdirectories to them?

yes.
the package system is aware what package owns what file, and
 will not be able to remove moved items at package upgrade or
uninstallation.

gnari






------------------------------

Date: 12 Feb 2004 22:45:57 GMT
From: "Tassilo v. Parseval" <tassilo.parseval@rwth-aachen.de>
Subject: Re: Debian Linux Perl installation (testing dist)
Message-Id: <c0gvn5$gr7$1@nets3.rz.RWTH-Aachen.DE>

Also sprach bill:

> I have three questions for anyone knowledgeable about Linux Debian's
> Perl installation.
> 
> The first question is, how can I change the Configure parameters
> that apt-get or dpkg -i use?  The default installation (at least
> for the testing distribution) has these values, which I don't
> entirely agree with:

[...]

You can't. Debian gives you a precompiled package. Last time I looked (I
had the same problems: I don't want a threaded perl for example) they
only had one.

So just compile your own Perl. This is what I always do.

Tassilo
-- 
$_=q#",}])!JAPH!qq(tsuJ[{@"tnirp}3..0}_$;//::niam/s~=)]3[))_$-3(rellac(=_$({
pam{rekcahbus})(rekcah{lrePbus})(lreP{rehtonabus})!JAPH!qq(rehtona{tsuJbus#;
$_=reverse,s+(?<=sub).+q#q!'"qq.\t$&."'!#+sexisexiixesixeseg;y~\n~~dddd;eval


------------------------------

Date: Thu, 12 Feb 2004 17:29:48 -0500
From: Jeff 'japhy' Pinyan <pinyaj@rpi.edu>
To: Marshall Dudley <mdudley@execonn.com>
Subject: Re: dereferencing problems
Message-Id: <Pine.SGI.3.96.1040212172847.95967A-100000@vcmr-64.server.rpi.edu>

[posted & mailed]

On Thu, 12 Feb 2004, Marshall Dudley wrote:

>If I use the following as the array:
>
>@fields = ("name","address","phone",\$date);
>
>the $$entry will work as I desire, but I cannot find any way to test
>reliably for the scaler to make the first block of the if statement
>execute.  I tried testing for !~ /\w/ and that works sometimes, but most
>of the time it does not.
>
>Does anyone have an ideas how to do what I thought would be a simple bit
>of code?

Sure:

  for my $element (@fields) {
    if (ref $element) {
      # it's a reference to something (in your case, a scalar)
    }
    else {
      # it's not a reference
    }
  }

-- 
Jeff Pinyan            RPI Acacia Brother #734            2003 Rush Chairman
"And I vos head of Gestapo for ten     | Michael Palin (as Heinrich Bimmler)
 years.  Ah!  Five years!  Nein!  No!  | in: The North Minehead Bye-Election
 Oh.  Was NOT head of Gestapo AT ALL!" | (Monty Python's Flying Circus)



------------------------------

Date: Thu, 12 Feb 2004 22:36:33 +0000 (UTC)
From: Ben Morrow <usenet@morrow.me.uk>
Subject: Re: dereferencing problems
Message-Id: <c0gv5h$q11$1@wisteria.csv.warwick.ac.uk>

[DON'T post MIME messages here]

Marshall Dudley <mdudley@execonn.com> wrote:
> For instance:
> 
> Lets say I have the variables name, address and phone coming in on the
> form, but the variable $date is created by the script earlier:
> 
> @fields = ("name","address","phone","\$date");
> or
> @fields = ("name","address","phone",'$date');
> or
> @fields = ("name","address","phone",'\$date');

You should have
    use strict;
at the top of your program, when all of these would fail.

> If I use the following to try and get the values, it fails, the date
> comes in null for $$entry and a large number followed by $entry for the
> $($entry) :
> 
> foreach my $entry (@fields) {
>         if ($entry !~ /\$/) {  #this is not an $form_data variable
>                 $log .= "$$entry - $($entry)\t";

This will interpolate the variable $(, which is a space-separated list
of gids. What you meant was
    ... - \$($entry)...

>         } else {                #it is a form_data variable
>                 $log .= "$form_data{$entry}\t";
>         }
> }
> 
> If I use the following as the array:
> 
> @fields = ("name","address","phone",\$date);
> 
> the $$entry will work as I desire, but I cannot find any way to test
> reliably for the scaler to make the first block of the if statement
> execute.  I tried testing for !~ /\w/ and that works sometimes, but most
> of the time it does not.

Don't try and use the symbol table when a real hash will do.

my %processed_data = %form_data;
$processed_data{date} = <however you set $date before>;

for my $entry (qw/name address phone date/) {
    $log .= "$processed_data{$entry}\t";
}

Alternatively, if you *really* want to do it the way you did, you can
do:

my @fields = (qw/name address phone/, \$date);

for my $entry (@fields) {
    if (ref $entry) {
        $log .= "$$entry - \$($entry)\t";
    }
    else {
        $log .= "$form_data{$entry}\t";
    }
}

Note that this will only work with proper references (\$date) not the
symrefs you were trying to use above ('$date').

Ben

-- 
'Deserve [death]? I daresay he did. Many live that deserve death. And some die
that deserve life. Can you give it to them? Then do not be too eager to deal
out death in judgement. For even the very wise cannot see all ends.'
 :-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-: ben@morrow.me.uk


------------------------------

Date: Thu, 12 Feb 2004 22:27:27 GMT
From: Darren Dunham <ddunham@redwood.taos.com>
Subject: Re: Forgetting how to use vec
Message-Id: <j5TWb.23064$JA7.10630@newssvr27.news.prodigy.com>

Aaron Sherman <ajs@ajs.com> wrote:
> I think it's time for me to write a module that implements a generic
> version of vec (obviously with a different calling convention).

There is already Bit::Vector which may be useful.

-- 
Darren Dunham                                           ddunham@taos.com
Senior Technical Consultant         TAOS            http://www.taos.com/
Got some Dr Pepper?                           San Francisco, CA bay area
         < This line left intentionally blank to confuse you. >


------------------------------

Date: 12 Feb 2004 22:44:20 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: Forgetting how to use vec
Message-Id: <c0gvk4$jh8$2@mamenchi.zrz.TU-Berlin.DE>

Darren Dunham  <ddunham@redwood.taos.com> wrote in comp.lang.perl.misc:
> Aaron Sherman <ajs@ajs.com> wrote:
> > I think it's time for me to write a module that implements a generic
> > version of vec (obviously with a different calling convention).
> 
> There is already Bit::Vector which may be useful.

That is a huge powerful module, often the right choice when your problem
hinges on massive bit manipulation.  For casual use Simon Cozens'
Bit::Vector::Minimal is an alternative.

Anno


------------------------------

Date: Thu, 12 Feb 2004 13:40:07 -0800
From: "davido@codethought.nospamforme.com" <me@privacy.net>
Subject: Re: Include data in a perl program?
Message-Id: <8esn20hufi9jkijpk4aku39mkmp9gvl6jo@4ax.com>

On Wed, 11 Feb 2004 17:20:18 +0100, Thomas Kratz
<ThomasKratz@REMOVEwebCAPS.de> wrote:

>What about using Data::Dumper to dump a complete Win32::TieRegistry tree
>to text and store that below the __DATA__ token? Later you can eval the
>text data back to a hash and feed it again to Win32::TieRegistry.
>Perhaps you'll have to set a few of the Win32::TieRegistry options like 
>'ArrayValues' or 'DualBinVals' to get a true 1:1 save nad restore.
>I haven't tested it myself, but it should be possible.


Well, so far I keep running into the same problem.  I get my hash
reference and all that gets written to the registy is a 'text'
representation of the TieRegistry data.  Any other ideas would be
appreciated...

Example: Win32::TieRegistry=HASH(0x207d420)


Code:
    my %filetypes;
    my $hashref;
    
    $Registry->Delimiter("/");
    $Registry->AllowLoad(1);
    $Registry->ArrayValues(1);
    
    my $eol = undef $/;
    eval <DATA>;

    $Registry->{"CUser/Software/VanDyke/SecureFX/File
Types"}=\%filetypes
       or die "Can't set the File Types: $^E\n";
    $/ = $eol;




------------------------------

Date: Thu, 12 Feb 2004 23:45:59 +0100
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: Just curious: perl + C + asm, any?
Message-Id: <s90o20l6a5oaj6sv0i1tg1j4e6rrdr6fi2@4ax.com>

On Wed, 11 Feb 2004 20:59:46 +0000 (UTC), Ilya Zakharevich
<nospam-abuse@ilyaz.org> wrote:

>> As of the subject, I was wondering if anyone has ever written a binary
>> module for perl that in turn had some routines written in assembler,
>> for efficiency reasons.
>
>Why not?  Take a module which uses an externally available C code
>which uses ASM (such as Math::Pari).  This is a beast to compile,
>though, since Perl's Config.pm does not know how to run assembler...
>
>Or, less strict, take any Perl module which links with a library which
>is compiled from assembler code (such as Math::GMP).

This is exactly what I meant! Thanks, I would have thought that to
much a more rare thing though.


Michele
-- 
you'll see that it shouldn't be so. AND, the writting as usuall is
fantastic incompetent. To illustrate, i quote:
- Xah Lee trolling on clpmisc,
  "perl bug File::Basename and Perl's nature"


------------------------------

Date: Thu, 12 Feb 2004 22:26:28 -0000
From: "David K. Wall" <dwall@fastmail.fm>
Subject: Re: Optimization request
Message-Id: <Xns948DB16BC5C70dkwwashere@216.168.3.30>

Aaron Sherman <ajs@ajs.com> wrote:

> "David K. Wall" <dwall@fastmail.fm> wrote in message
> news:<Xns9486C8112D71Adkwwashere@216.168.3.30>... 
> 
>> Might I suggest that you read my post too quickly?
> 
> No, I did not. He didn't ask which you would prefer, or how you would
> explain a speed difference, he asked which was faster for you, and you
> didn't answer that.
> 
> I only jump on this because I've asked similar questions over the
> years, and I always get people who answer based on gut reaction. With
> Perl especially, where the language is defined by a single
> implementation with a maze of special-case optimizations, you simply
> cannot look at a piece of code and say, "well that one has more steps,
> so it's less efficient." It might well work that way in that case, but
> unless you run the numbers, you have no real idea.

I read the OP as asking "which is faster and why?" and responded with what 
I thought was correct and why I thought so. It's not the technical 
information you posted that I object to. I want corrections to any 
technical mistakes I make in my posts. 

The reason I responded to your post is because it seemed (and seems) to 
criticize me and not my answer to the OP. I guess I tried too hard to be 
polite and didn't make that point. 

Just drop it, ok? You convinced me the first time, I don't need yet another 
sermon.


------------------------------

Date: 12 Feb 2004 13:09:42 -0800
From: kprunell@microsoft.com (KP)
Subject: parsing out all data between two words with multiple instances in a file.
Message-Id: <5ffb95e0.0402121309.399e64f4@posting.google.com>

I'm trying to find a way to parse out all data between two words
within a file that contains multiple instances where important data
would be extracted out. The data file would look like such.

<blah>
<junk>
<pre>
 ...importantdata1
 ...importantdata2
 ...importantdata3
</pre>
<blah>
<junk>
<morejunk)
<pre>
 ...importantdata1
 ...importantdata2
 ...importantdata3
</pre>
</morejunk>
<blah>

Note: So afterwords the script would print something out to the
console like such.

 ...importantdata1
 ...importantdata2
 ...importantdata3
;
 ...importantdata1
 ...importantdata2
 ...importantdata3

Note: I would seprate those instances with a semi-colon. So later down
the road I could parse this data into seperate files.

Thanks


------------------------------

Date: Thu, 12 Feb 2004 22:38:47 +0000 (UTC)
From: Ben Morrow <usenet@morrow.me.uk>
Subject: Re: parsing out all data between two words with multiple instances in a file.
Message-Id: <c0gv9n$q11$2@wisteria.csv.warwick.ac.uk>


kprunell@microsoft.com (KP) wrote:
> I'm trying to find a way to parse out all data between two words
> within a file that contains multiple instances where important data
> would be extracted out. The data file would look like such.
<snip>
> Note: I would seprate those instances with a semi-colon. So later down
> the road I could parse this data into seperate files.

Why don't you have a go, then we can help you improve it? Start by
reading up on the .. operator in perldoc perlop.

Alternatively, if your data actually is an XML file, you may find it
easier to use one of the XML parsing modules (I'd recommend
XML::LibXML for this sort of thing).

Ben

-- 
I've seen things you people wouldn't believe: attack ships on fire off the
shoulder of Orion; I've watched C-beams glitter in the darkness near the
Tannhauser Gate. All these moments will be lost, in time, like tears in rain.
Time to die.  |-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-|  ben@morrow.me.uk


------------------------------

Date: 12 Feb 2004 12:00:10 -0800
From: kewlkarun@yahoo.com (KK)
Subject: Re: perl 'sendmail' equivalent in windows
Message-Id: <c8fd5039.0402121200.39f9e3fb@posting.google.com>

Thanks Gunnar & others for your suggestions. I'm new to this world of
SMTP server & I dont know how to figure out the name of my local mail
server (which is a parameter for the program) in the following two
cases.
1. When I work on my 56.6Kbps modem using AOL as ISP.
2. Working on my university terminal whose mail server is a pop3 (i
dont know if it falls under the category of SMTP !)
Thanks in advance!
-Cheers,
Gunnar Hjalmarsson <noreply@gunnar.cc> wrote in message news:<c0fj4o$14lgja$1@ID-184292.news.uni-berlin.de>...
> KK wrote:
> > Wondering if anyone can help me in finding the perl's 'sendmail'
> > equivalent command for windows.
> 
> There is no "perl's sendmail command". sendmail is a mail transfer 
> agent that is typically available on *nix platforms. Another thing is 
> that you often open a pipe to sendmail from Perl programs when you 
> want to send messages.
> 
> > I want to send a mail from a window machine.
> 
> One option is to have sendmail.exe installed, and do as you would have 
> done on *nix. Another option is to send the message directly from Perl 
> by making use of one of the many Perl modules for the purpose. 
> Personally I have good experiences from using Mail::Sender.


------------------------------

Date: Thu, 12 Feb 2004 20:36:17 +0000 (UTC)
From: Ben Morrow <usenet@morrow.me.uk>
Subject: Re: perl 'sendmail' equivalent in windows
Message-Id: <c0go41$l8b$1@wisteria.csv.warwick.ac.uk>

[please don't top-post]

kewlkarun@yahoo.com (KK) wrote:
> Gunnar Hjalmarsson <noreply@gunnar.cc> wrote in message news:<c0fj4o$14lgja$1@ID-184292.news.uni-berlin.de>...
> > KK wrote:
> > >
> > > I want to send a mail from a window machine.
> > 
> > One option is to have sendmail.exe installed, and do as you would have 
> > done on *nix. Another option is to send the message directly from Perl 
> > by making use of one of the many Perl modules for the purpose. 
> > Personally I have good experiences from using Mail::Sender.
>
> I'm new to this world of SMTP server & I dont know how to figure out
> the name of my local mail server (which is a parameter for the
> program) in the following two cases.
>
> 1. When I work on my 56.6Kbps modem using AOL as ISP.
> 2. Working on my university terminal whose mail server is a pop3 (i
> dont know if it falls under the category of SMTP !)

In both cases, you will need to ask the relevan tech support people
(or examine their websites). If you have a mail client (e.g. Outlook
or some such) already working, you should be able to find the
information in its settings somewhere.

POP3 is not at all the same as SMTP: as far as you are concerned, POP3
is used for receiving mail whereas SMTP is used for sending it.

Ben

-- 
   If you put all the prophets,   |   You'd have so much more reason
   Mystics and saints             |   Than ever was born
   In one room together,          |   Out of all of the conflicts of time.
ben@morrow.me.uk |----------------+---------------| The Levellers, 'Believers'


------------------------------

Date: Thu, 12 Feb 2004 13:17:41 -0600
From: Ken Browning <kenbrow@bellsouth.net>
Subject: Re: Perl Sockets Parent/Child Problem
Message-Id: <dujn20t0vm8tuktgalov4fbaatd9ueoftk@4ax.com>

Now for the socket part of the problem.  Just assume that I have the
previous program running correctly.  My program (the client) sends to
the server and the server sends back to the client which causes the
client to send to the server, etc. etc.  Take the following exchange,
for example:

Client: 400=
Server: 205="abcdefg"
Client: 207="123456"
Server: 214=

etc......

The problem is that I can connect to this server process with telnet
(just connect to a particular port)  and send the tag/values to the
server and the responses come back MUCH faster that they do to the
Perl program.  Is there something in the ways the sockets are
constructed in my program that would cause them to be slow?  With the
telnet connection, the responses are visible on instantaneously but
with the Perl client there are one or two seconds of lag..

Any suggestions?



----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==----
http://www.newsfeed.com The #1 Newsgroup Service in the World! >100,000 Newsgroups
---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =---


------------------------------

Date: 12 Feb 2004 13:54:43 -0800
From: ac063@lafn.org (David Smith)
Subject: Problems with version 5.8.0 on OS/2
Message-Id: <f96d4b88.0402121354.3dcce614@posting.google.com>

Is anyone out there running this version of Perl on OS/2?  I am trying to 
install it (obtained from Hobbes), and am encountering some problems.
 
I have the following files
 
perl-5.8.0-bin-aout.zip
perl-5.8.0-bin.zip
perl-5.8.0-core.zip
perl-5.8.0-doc.zip
 
and am unable to execute programs.  I believe my problem is with a 
thing called @INC.  According to @INC, this version of Perl was built 
with a target drive of L:.  I want to change this to D:.   If I 
understand correctly, the PERLLIB_PREFIX  statement placed (as one 
option) in the config.sys (which I have done) should override the 
prebuilt target drive with one of my choosing.  I have "set 
PERLLIB_PREFIX = L:/Perl/lib;D:\Perl\lib" in my config.sys.  Entering 
"set" at a command promt verifies this. However, this doesn't work.
 
Suggestions? Recommendations?  Thank you.
 --


------------------------------

Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin) 
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>


Administrivia:

#The Perl-Users Digest is a retransmission of the USENET newsgroup
#comp.lang.perl.misc.  For subscription or unsubscription requests, send
#the single line:
#
#	subscribe perl-users
#or:
#	unsubscribe perl-users
#
#to almanac@ruby.oce.orst.edu.  

NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice. 

To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.

#To request back copies (available for a week or so), send your request
#to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
#where x is the volume number and y is the issue number.

#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.


------------------------------
End of Perl-Users Digest V10 Issue 6124
***************************************


home help back first fref pref prev next nref lref last post