[13643] in Perl-Users-Digest
Perl-Users Digest, Issue: 1053 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Oct 15 13:52:12 1999
Date: Fri, 15 Oct 1999 10:51:09 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <940009868-v9-i1053@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Fri, 15 Oct 1999 Volume: 9 Number: 1053
Today's topics:
"Proper" way to load a file <hiller@email.com>
Re: "Proper" way to load a file (Martien Verbruggen)
Re: "Proper" way to load a file <ltl@rgsun40.viasystems.com>
Re: "Proper" way to load a file (Tad McClellan)
Re: "Proper" way to load a file <pdobbs@home.com>
Re: "Proper" way to load a file (Craig Berry)
$_ embarrasment was [Re: move files in directories...] <ltl@rgsun40.viasystems.com>
*MY* answer... emlyn_a@my-deja.com
Re: *MY* answer... (Henry Penninkilampi)
--->>>> Input Password without echoing !!! <marco.cerqui@alcatel.ch>
Re: --->>>> Input Password without echoing !!! <David.Gwilt@arm.com>
Re: --->>>> Input Password without echoing !!! (Brett W. McCoy)
Re: --->>>> Input Password without echoing !!! (Tad McClellan)
Re: .pl files How to convert in text format ? <dan.ho@pacific.net.sg>
<BASE HREF> problem: how to force "OFF"? <tiny@SpringfieldLife.com>
Re: <BASE HREF> problem: how to force "OFF"? (brian d foy)
@ARGV ---- Arrrrgggghhhh! :-) <tturton@ntx.waymark.net>
Re: @ARGV ---- Arrrrgggghhhh! :-) <msalter@bestweb.net>
[ANNOUNCE] Text-Ispell-0.04 (John Porter)
[Perl] How to find the Perl FAQ <rootbeer&pfaq*finding*@redcat.com>
Re: A different turn ( WAS Re: Bye Tom? ) <isaac.hepworth@dresdner-bank.com>
Re: Access to ARGV from XS? <dan@tuatha.sidhe.org>
Re: Accessing MS Access Database from Unix <gellyfish@gellyfish.com>
Re: Accessing MS Access Database from Unix <ccarr@websocket.com>
ActivePerl/NT: crypt() not implemented ??? <onnen@heart-line.de>
Re: ActivePerl/NT: crypt() not implemented ??? harris_m@my-deja.com
Re: ActivePerl/NT: crypt() not implemented ??? <ehpoole@ingress.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 15 Oct 1999 02:53:29 GMT
From: Jordan Hiller <hiller@email.com>
Subject: "Proper" way to load a file
Message-Id: <37DF0AD2.9DEA20F2@email.com>
I need to load the contents of an entire local file into a scalar. This
is the way I've been doing, it, but I vaguely remember reading somewhere
that this way is inefficient, dangerous, or in some way "bad." Can
someone suggest a better way?
open(FILE, "<filename.txt") || die("Can't open filename.txt: $!");
@lines = <FILE>; # This is the part that I think is bad
$contents = join('', @lines);
close(FILE);
Thanks,
Jordan Hiller (hiller@email.com)
------------------------------
Date: Fri, 15 Oct 1999 03:14:24 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: "Proper" way to load a file
Message-Id: <k_wN3.298$Kd.4681@nsw.nnrp.telstra.net>
On Fri, 15 Oct 1999 02:53:29 GMT,
Jordan Hiller <hiller@email.com> wrote:
> I need to load the contents of an entire local file into a scalar. This
> is the way I've been doing, it, but I vaguely remember reading somewhere
> that this way is inefficient, dangerous, or in some way "bad." Can
> someone suggest a better way?
>
> open(FILE, "<filename.txt") || die("Can't open filename.txt: $!");
> @lines = <FILE>; # This is the part that I think is bad
> $contents = join('', @lines);
> close(FILE);
Not bad, just wasteful.
# perldoc perlvar
/INPUT_RECORD_SEPARATOR
# perldoc perlop
/INPUT_RECORD_SEPARATOR
make sure that that is undefined. You probably want to use a local as well.
Martien
--
Martien Verbruggen |
Interactive Media Division | In the fight between you and the world,
Commercial Dynamics Pty. Ltd. | back the world - Franz Kafka
NSW, Australia |
------------------------------
Date: 15 Oct 1999 03:56:09 GMT
From: lt lindley <ltl@rgsun40.viasystems.com>
Subject: Re: "Proper" way to load a file
Message-Id: <7u68kp$9ke$1@rguxd.viasystems.com>
Jordan Hiller <hiller@email.com> wrote:
:>I need to load the contents of an entire local file into a scalar. This
:>is the way I've been doing, it, but I vaguely remember reading somewhere
:>that this way is inefficient, dangerous, or in some way "bad." Can
:>someone suggest a better way?
That depends on your definition of bad. You seem to be aware that
the entire contents of the file are read into memory before you do
anything with said contents. If that is necessary for what you are
trying to do, then it is not bad.
:>open(FILE, "<filename.txt") || die("Can't open filename.txt: $!");
:>@lines = <FILE>; # This is the part that I think is bad
:>$contents = join('', @lines);
:>close(FILE);
There is an easier way. It is known as "slurping". The
preferred idiom is:
{
local $/; # undef's it so read slurps the entire file
$contents = <FILE>;
}
Though:
undef $/;
$contents = <FILE>;
works too, the first one isolates the changed behavior to
the limited scope.
It may be in the damn faq somewhere, but `perldoc -q slurp` didn't
find it. `perldoc -q read` did turn up something on "reading a
paragraph at a time" which introduces $/ and the fact that you can
read more about that in `perldoc perlvar`, which is where you can
find out that setting $/ to undef causes the rest of the file to be
slurped up on the next read. Bit of a convoluted trail when you
don't know exactly what you are looking for.
--
// Lee.Lindley /// I used to think that being right was everything.
// @bigfoot.com /// Then I matured into the realization that getting
//////////////////// along was more important. Except on usenet.
------------------------------
Date: Thu, 14 Oct 1999 22:12:06 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: "Proper" way to load a file
Message-Id: <mh26u7.bh4.ln@magna.metronet.com>
Jordan Hiller (hiller@email.com) wrote:
: I need to load the contents of an entire local file into a scalar. This
: is the way I've been doing, it, but I vaguely remember reading somewhere
: that this way is inefficient, dangerous, or in some way "bad." Can
: someone suggest a better way?
{ local $/; # undef is slurp mode
my $contents = <FILE>; # slurp the whole file into the scalar
}
The $/ (input record separator) special variable is
documented in perlvar.pod.
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Fri, 15 Oct 1999 12:45:34 GMT
From: Paul D <pdobbs@home.com>
Subject: Re: "Proper" way to load a file
Message-Id: <38072314.EA6AF51F@home.com>
I'm a bit fresh to Perl myself, so others will correct me if I'm wrong.
open (FILE, "<$File") || die("I just can't do it cap'n! $!");
while(<FILE>)
{contents = $contents . $_ ;}
close (FILE);
The $_ as you probably know is the default variable for input. From your
stuff below, it seems to me you just want to tie all the lines inside
the
file into one variable. If you want a space between each line as well,
just
change the one line above into this:
{contents = $contents . " " . $_ ;}
So the idea is that it says "While reading input from filehandle FILE,
add the stuff from the default storage variable $_ onto the end of the
$contents variable. (and place a space inbetween if you want that too)
I don't know that there is anything bad about your format though. I like
the above though for just doing a simple "total" read-in of a file.
Jordan Hiller wrote:
> I need to load the contents of an entire local file into a scalar. This
> is the way I've been doing, it, but I vaguely remember reading somewhere
> that this way is inefficient, dangerous, or in some way "bad." Can
> someone suggest a better way?
>
> open(FILE, "<filename.txt") || die("Can't open filename.txt: $!");
> @lines = <FILE>; # This is the part that I think is bad
> $contents = join('', @lines);
> close(FILE);
> Thanks,
> Jordan Hiller (hiller@email.com)
------------------------------
Date: Fri, 15 Oct 1999 17:17:37 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: "Proper" way to load a file
Message-Id: <s0eodh7rr0164@corp.supernews.com>
Tad McClellan (tadmc@metronet.com) wrote:
: Jordan Hiller (hiller@email.com) wrote:
: : I need to load the contents of an entire local file into a scalar. This
: : is the way I've been doing, it, but I vaguely remember reading somewhere
: : that this way is inefficient, dangerous, or in some way "bad." Can
: : someone suggest a better way?
:
:
: { local $/; # undef is slurp mode
: my $contents = <FILE>; # slurp the whole file into the scalar
: }
Trouble with this construct is that the lexical $contents is lost at that
closing brace. That's why I prefer the idiom
my $contents = do { local $/; <FILE>; };
--
| Craig Berry - cberry@cinenet.net
--*-- http://www.cinenet.net/users/cberry/home.html
| "They do not preach that their God will rouse them
a little before the nuts work loose." - Kipling
------------------------------
Date: 14 Oct 1999 03:48:18 GMT
From: lt lindley <ltl@rgsun40.viasystems.com>
Subject: $_ embarrasment was [Re: move files in directories...]
Message-Id: <7u3jq2$dtl$1@rguxd.viasystems.com>
David Wall <darkon@one.net> wrote:
:>In article <7u2758$lt$1@rguxd.viasystems.com>, lee.lindley@bigfoot.com wrote:
:> [snip] I mostly wrote SAS programs,
:>which is hardly programming at all. [snip]
I've written SAS and even SAS graphics to produce bar charts and such
on a MVS system. It's the only language that I hate worse than tcl.
:> [snip][ My problem
:>was that somehow I got it into my head that $_ stored the result of the
:>last assignment to a variable. I think you can see how I got that
:>impression. Since I thought I knew what it meant, I always skimmed over $_
:>when I was looking through perlvar.
No, I don't see how you got that particular impression. But then I
get disabused of similarly absurd notions even now. Just this week I
admitted to thinking that zero width assertions in regexp got special
treatment as to when they were evaluated.
The brain builds a model of how the world works and sticks with it
until something breaks the model.
:>That's embarassing, and I hate to admit it. Oh, well, the embarrassment
:>will help it stick. :-)
Good attitude. You'll need it if you continue to play in this
newsgroup.
:>(But I'm still embarrassed)
Your blushing red but still grinning face provides a nice relief
from the more common defensive accusations of sadism. Thanks. :-)
--
// Lee.Lindley /// I used to think that being right was everything.
// @bigfoot.com /// Then I matured into the realization that getting
//////////////////// along was more important. Except on usenet.
------------------------------
Date: Fri, 15 Oct 1999 12:28:11 GMT
From: emlyn_a@my-deja.com
Subject: *MY* answer...
Message-Id: <7u76kg$duf$1@nnrp1.deja.com>
I posted this earlier, but here it is in case someone missed it. I
insterted this into the subroutine that pasres the form field:
$value =~ s/\%0D/<br>/g;
$value =~ s/\%0A//g;
For some reason, it's better to replace the %0D with HTML breaks (or
whatever you want) rather than both the %0D and %0A. It's better to
just replace %0A with nothing and let %0D do the spacing.
Result? It returns formatted text to the screen on print, and it writes
the entire contents of the textarea to a |field| with nice <br>s where
they should be (with another &sub).
It works. Maybe it's not beautiful, but it works. Maybe YOU wouldn't do
it that way, but it works. Maybe I'm an idiot for doing it this way,
but it works. It works for Mac, it works for PC, and that's good enough
for me.
It works.
Thanks to those of you who chose to help me, who didn'tcare that I
wasn't a member of your club, and who thought it was OK to lend help to
a newbie without having to be offically a part of the perl clique.
To those of you who insist on preserving your unique identities as
holier-than-thou programmer types by belittling the "foreigner", you
performed wonderfully. Well done.
E.
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Sat, 16 Oct 1999 00:38:51 +0930
From: spamfree@metropolis.net.au (Henry Penninkilampi)
Subject: Re: *MY* answer...
Message-Id: <spamfree-1610990038520001@d6.metropolis.net.au>
In article <7u76kg$duf$1@nnrp1.deja.com>, emlyn_a@my-deja.com wrote:
> I posted this earlier, but here it is in case someone missed it. I
> insterted this into the subroutine that pasres the form field:
>
> $value =~ s/\%0D/<br>/g;
> $value =~ s/\%0A//g;
>
> For some reason, it's better to replace the %0D with HTML breaks (or
> whatever you want) rather than both the %0D and %0A. It's better to
> just replace %0A with nothing and let %0D do the spacing.
From memory, %0D == carriage return and %0A = line feed. Some systems use
a carriage return only (MacOS) and some use a combination of carriage
return *and* line feed (WinDOS). Thus by replacing the %0D you actually
catch data from both platforms (because the character is common to both
platforms). The MacOS never generates %0A characters, so attempting to
catch a %0D%0A combo means you never get a match on input generated on a
Mac.
Unless I've mistaken this for another thread, weren't you trying to find a
way to turn the contents of a text field (submitted by way of a form) into
a single clean line of text that you could store in a database? If so,
have you encountered any other problems apart from the line wrapping
issue?
Thanks for posting your solution, by the way.
Henry.
------------------------------
Date: Thu, 14 Oct 1999 14:25:37 +0200
From: "Marco Cerqui" <marco.cerqui@alcatel.ch>
Subject: --->>>> Input Password without echoing !!!
Message-Id: <7u4i43$c0q$1@pollux.ip-plus.net>
Hi
I have written a perl script who synchronize the NIS and SMB-Password. Now I
have only one problem: What have I to do, that the password not will be
echoed.
Can someone please help me !!!
Thanks
Marco
------------------------------
Date: Thu, 14 Oct 1999 14:05:10 +0100
From: David Gwilt <David.Gwilt@arm.com>
Subject: Re: --->>>> Input Password without echoing !!!
Message-Id: <3805D506.DB87F05C@arm.com>
Marco,
Courtesy of 'Mastering Algorithms with perl, p528'
use Term::ReadKey;
my ($pwd,$uname);
print "Enter User Name\n";
chomp ($uname = <>);
ReadMode 2;
print "Enter Password\n";
chomp ($pwd = <>);
ReadMode 0;
print "
Name : $uname
Pwd : $pwd\n";
Cheers
Dave G.
> Hi
>
> I have written a perl script who synchronize the NIS and SMB-Password. Now I
> have only one problem: What have I to do, that the password not will be
> echoed.
>
> Can someone please help me !!!
>
> Thanks
>
> Marco
------------------------------
Date: Thu, 14 Oct 1999 13:23:20 GMT
From: bmccoy@foiservices.com (Brett W. McCoy)
Subject: Re: --->>>> Input Password without echoing !!!
Message-Id: <slrn80bmi9.ng.bmccoy@moebius.foiservices.com>
Also Sprach Marco Cerqui <marco.cerqui@alcatel.ch>:
>I have written a perl script who synchronize the NIS and SMB-Password. Now I
>have only one problem: What have I to do, that the password not will be
>echoed.
Take a look at Term::Cap and Term::ReadLine. They both control output to
the terminal screen.
--
Brett W. McCoy bmccoy@foiservices.com
Computer Operations Manager (Alpha Geek) http://www.foiservices.com
FOI Services, Inc./DIOGENES 301-975-0110
---------------------------------------------------------------------------
------------------------------
Date: Thu, 14 Oct 1999 08:00:26 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: --->>>> Input Password without echoing !!!
Message-Id: <qkg4u7.u63.ln@magna.metronet.com>
Marco Cerqui (marco.cerqui@alcatel.ch) wrote:
: I have written a perl script who synchronize the NIS and SMB-Password. Now I
: have only one problem: What have I to do, that the password not will be
^^^^^^^^
: echoed.
: Can someone please help me !!!
You have already been helped!
Stop ignoring it!
perldoc -q password
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 13 Oct 1999 14:08:25 +0800
From: Daniel <dan.ho@pacific.net.sg>
Subject: Re: .pl files How to convert in text format ?
Message-Id: <380421D9.1FDE4B14@pacific.net.sg>
Hi
i suppose u uses Binary method to transfer the file from the webserver to
your computer..in order to read it? if u do via Binary method it will
screw up the file format..u need to use ASCII method instead..
Perl can be read on Notepad or any text editor..
Daniel
ledanseurs wrote:
> Hi ,
>
> I am working on Win NT 4 Workstation. I was given some files with 'pl'
> extension,
> (ex file.pl ), I can read them with a software called Worldview.
> I have to convert those files to text files (.txt), do you know how to
> do that ?
> If I open those files with Word Pad or Note pad , they are full of
> unreadable ascii
> caracters, so i really need a program that can convert those kind of
> files.
>
> Thank you
>
> Laurent
>
> e-mail: lsouriau@club-internet.fr
------------------------------
Date: Thu, 14 Oct 1999 11:15:22 -0500
From: "Tiny Troll" <tiny@SpringfieldLife.com>
Subject: <BASE HREF> problem: how to force "OFF"?
Message-Id: <7u4utn$5v2$1@news.ipa.net>
Hello all,
I am having trouble with a dynamically loaded CGI page using Perl5.005. The
generated document doesn't display properly in Netscape, but is fine in IE
and Opera.
I think the error is due to this html tag displaying in Netscape's source:
<BASE HREF="http://www.springfieldlife.com/cgi/">
This doesn't display in the source code generated for IE or Opera.
I can't just re-write my links to be relative as they aren't under the /cgi/
portion of the site (nor would I care to do so in the first place, even if I
could).
I am using the CGI.pm, but I do not have this option turned on (base='true'
in the header), nor am I using the CGI Method to display the HTML header
info (because I have lotsa JavaScript inserted there and prefer to send it
to the user's browser via a 'required' sub in a text document).
I sure hope you folks can help me! I asked my server-admin about it but he's
not seen this before.
Thanks in advance,
Erik
------------------------------
Date: Thu, 14 Oct 1999 16:29:29 -0400
From: brian@smithrenaud.com (brian d foy)
Subject: Re: <BASE HREF> problem: how to force "OFF"?
Message-Id: <brian-ya02408000R1410991629290001@news.panix.com>
In article <7u4utn$5v2$1@news.ipa.net>, "Tiny Troll" <tiny@SpringfieldLife.com> posted:
> I am having trouble with a dynamically loaded CGI page using Perl5.005. The
> generated document doesn't display properly in Netscape, but is fine in IE
> and Opera.
>
> I think the error is due to this html tag displaying in Netscape's source:
>
> <BASE HREF="http://www.springfieldlife.com/cgi/">
>
> This doesn't display in the source code generated for IE or Opera.
somewhere that line is being (incorectly) added. find that place
and you find the problem. it's almost impossible to say where to
look considering the complexity of modern servers. settle down for
a long debugging session.
good luck :)
--
brian d foy
CGI Meta FAQ <URL:http://www.smithrenaud.com/public/CGI_MetaFAQ.html>
Perl Monger Hats! <URL:http://www.pm.org/clothing.shtml>
------------------------------
Date: Fri, 15 Oct 1999 11:18:29 -0500
From: Tom Turton <tturton@ntx.waymark.net>
Subject: @ARGV ---- Arrrrgggghhhh! :-)
Message-Id: <380753D5.52679512@ntx.waymark.net>
Obviously, I've never fully comprehended how @ARGV handled command line
inputs...but I've just now tripped over something that I can't seem to
find the answer to in my books, or by doing searches on the Perl pod on
my system.
I "want" to feed wildcard character filenames in via @ARGV, but it is
seeking out matches and passing matched filenames in @ARGV. Is there
any way to override this feature short of having to put quotes around my
command line input?
example:
have files:
abc1.xxx abc2.xxx abc3.xxx abc4.xxx abc5.xxx
want to make call to Perl script, move_em.pl:
move_em.pl abc*.xxx def*.xxx
My intention was to grab the strings "abc*.xxx" and "def*.xxx" from
@ARGV, but instead, @ARGV contains "abc1.xxx" "abc2.xxx" ....
Thanks (and feel free to flame if I've completely overlooked something
which is intuitively obvious to the most semi-casual observer ;-)
---Tom Turton
------------------------------
Date: Fri, 15 Oct 1999 17:29:46 GMT
From: Mike Salter <msalter@bestweb.net>
Subject: Re: @ARGV ---- Arrrrgggghhhh! :-)
Message-Id: <Pine.BSF.4.05.9910151328220.6395-100000@monet.bestweb.net>
On Fri, 15 Oct 1999, Tom Turton wrote:
TT>Date: Fri, 15 Oct 1999 11:18:29 -0500
TT>From: Tom Turton <tturton@ntx.waymark.net>
TT>Newsgroups: comp.lang.perl.misc
TT>Subject: @ARGV ---- Arrrrgggghhhh! :-)
TT>
TT>Obviously, I've never fully comprehended how @ARGV handled command line
TT>inputs...but I've just now tripped over something that I can't seem to
TT>find the answer to in my books, or by doing searches on the Perl pod on
TT>my system.
TT>
TT>I "want" to feed wildcard character filenames in via @ARGV, but it is
TT>seeking out matches and passing matched filenames in @ARGV. Is there
TT>any way to override this feature short of having to put quotes around my
TT>command line input?
TT>
TT>example:
TT>
TT>have files:
TT> abc1.xxx abc2.xxx abc3.xxx abc4.xxx abc5.xxx
TT>
TT>want to make call to Perl script, move_em.pl:
TT>
TT> move_em.pl abc*.xxx def*.xxx
TT>
TT>My intention was to grab the strings "abc*.xxx" and "def*.xxx" from
TT>@ARGV, but instead, @ARGV contains "abc1.xxx" "abc2.xxx" ....
TT>
Tom:
Use single quote around args to supress expansion:
move_em.pl 'abc*.xxx' 'def*.xxx'
------------------------------
Date: Tue, 12 Oct 1999 22:25:14 GMT
From: jdporter@min.net (John Porter)
Subject: [ANNOUNCE] Text-Ispell-0.04
Message-Id: <slrn807da9.7qd.jdporter@min.net>
A new version, 0.04, of the Text::Ispell module has been uploaded to CPAN.
This release adds most of the features mentioned in the previous version's
docs as being "possible future enhancements".
Specifically, Text::Ispell now supports alternative main and personal
dictionaries; and the acceptance of compound words can be turned on and off.
Please visit the home of this module:
ftp://ftp.funet.fi/pub/languages/perl/CPAN/authors/id/J/JD/JDPORTER/
or under the equivalent directory on the CPAN site of your choice.
Please try out the module, and let me know of any features you'd
like to see incorporated. Bug reports are welcomed as well.
Thanks, hand,
John Porter
------------------------------
Date: Thu, 14 Oct 1999 10:24:02 GMT
From: Tom Phoenix <rootbeer&pfaq*finding*@redcat.com>
Subject: [Perl] How to find the Perl FAQ
Message-Id: <pfaqmessage939896642.11616@news.teleport.com>
Archive-name: perl-faq/finding-perl-faq
Posting-Frequency: weekly
Last-modified: 18 Aug 1999
[ That "Last-modified:" date above refers to this document, not to the
Perl FAQ itself! The last major update of the Perl FAQ was in Summer of
1998; of course, ongoing updates are made as needed. ]
For most people, this URL should be all you need in order to find Perl's
Frequently Asked Questions (and answers).
http://www.cpan.org/doc/FAQs/
Please look over (but never overlook!) the FAQ and related docs before
posting anything to the comp.lang.perl.* family of newsgroups.
# # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
Beginning with Perl version 5.004, the Perl distribution itself includes
the Perl FAQ. If everything is pro-Perl-y installed on your system, the
FAQ will be stored alongside the rest of Perl's documentation, and one
of these commands (or your local equivalents) should let you read the FAQ.
perldoc perlfaq
man perlfaq
If a recent version of Perl is not properly installed on your system,
you should ask your system administrator or local expert to help. If you
find that a recent Perl distribution is lacking the FAQ or other important
documentation, be sure to complain to that distribution's author.
If you have a web connection, the first and foremost source for all things
Perl, including the FAQ, is the Comprehensive Perl Archive Network (CPAN).
CPAN also includes the Perl source code, pre-compiled binaries for many
platforms, and a large collection of freely usable modules, among its
560_986_526 bytes (give or take a little) of super-cool (give or take
a little) Perl resources.
http://www.cpan.org/
http://www.perl.com/CPAN/
http://www.cpan.org/doc/FAQs/FAQ/html/
http://www.perl.com/CPAN/doc/FAQs/FAQ/html/
You may wish or need to access CPAN via anonymous FTP. (Within CPAN,
you will find the FAQ in the /doc/FAQs/FAQ directory. If none of these
selected FTP sites is especially good for you, a full list of CPAN sites
is in the SITES file within CPAN.)
California ftp://ftp.cdrom.com/pub/perl/CPAN/
Texas ftp://ftp.metronet.com/pub/perl/
South Africa ftp://ftp.is.co.za/programming/perl/CPAN/
Japan ftp://ftp.dti.ad.jp/pub/lang/CPAN/
Australia ftp://cpan.topend.com.au/pub/CPAN/
Netherlands ftp://ftp.cs.ruu.nl/pub/PERL/CPAN/
Switzerland ftp://sunsite.cnlab-switch.ch/mirror/CPAN/
Chile ftp://ftp.ing.puc.cl/pub/unix/perl/CPAN/
If you have no connection to the Internet at all (so sad!) you may wish
to purchase one of the commercial Perl distributions on CD-Rom or other
media. Your local bookstore should be able to help you to find one.
Another possibility is to use one of the FTP-via-email services; for
more information on doing that, send mail to <mail-server@rtfm.mit.edu>
(not to me!) with these lines in the body of the message, flush left:
setdir usenet-by-group/news.announce.newusers
send Anonymous_FTP:_Frequently_Asked_Questions_(FAQ)_List
# # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
Comments and suggestions on the contents of this document
are always welcome. Please send them to the author at
<pfaq&finding*comments*@redcat.com>. Of course, comments on
the docs and FAQs mentioned here should go to their respective
maintainers.
Have fun with Perl!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Wed, 13 Oct 1999 18:54:00 +0100
From: "Isaac Hepworth" <isaac.hepworth@dresdner-bank.com>
Subject: Re: A different turn ( WAS Re: Bye Tom? )
Message-Id: <7u2gq4$jhl7@ln1p0207inf.dresdnerkb.com>
Abigail <abigail@delanet.com> wrote in message
news:slrn7vjnho.e85.abigail@alexandra.delanet.com...
> Anno Siegel (anno4000@lublin.zrz.tu-berlin.de) wrote on MMCCXXVI
> September MCMXCIII in <URL:news:7tck1p$316$1@lublin.zrz.tu-berlin.de>:
> :: Abigail <abigail@delanet.com> wrote in comp.lang.perl.misc:
> ::
> :: >I've gotten a love letter from a complete stranger on my pager.
Unsigned.
> ::
> :: So how do you know it was from a stranger?
>
>
> Because it was certainly not any of the 4 people who knew my pager number.
>
So someone sent it by mistake, or got the wrong number. How do you know this
person was a stranger?
------------------------------
Date: Tue, 12 Oct 1999 21:56:29 GMT
From: Dan Sugalski <dan@tuatha.sidhe.org>
Subject: Re: Access to ARGV from XS?
Message-Id: <h8OM3.491$IZ5.14206@news.rdc1.ct.home.com>
yacob99@my-deja.com wrote:
> Can't find any info on this...
> ...from within XS code do we have access to @ARGV somehow?
Sure. It's just another package variable, more or less. Get its
AV * with perl_get_av and have at it. You'll want to be a touch
careful as there may be magic attached, though.
Dan
------------------------------
Date: 12 Oct 1999 21:02:48 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Accessing MS Access Database from Unix
Message-Id: <7u07lo$1qk$1@gellyfish.btinternet.com>
In comp.lang.perl.misc AcCeSsDeNiEd <dillon_rm@magix.com.sg> wrote:
> I have perl running on Unix
>
> Is there anyway I can access a MS Access database?
> The Access database can be hosted either on a Win32 or the Unix
> machine itself.
Search <http://freshmeat.net> for ODBC ....
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Tue, 12 Oct 1999 22:09:56 -0500
From: Clinton Carr <ccarr@websocket.com>
To: dillon_rm@magix.com.sg
Subject: Re: Accessing MS Access Database from Unix
Message-Id: <3803F804.1B694A8F@websocket.com>
I have two solutions. One is my IDBS and the other is based on ASP. IDBS
is installed on a NT server
that has access to a '*.mdb' database. It connects to the MS Access
database via Microsoft's ODBC driver and then listens for incoming SQL
requests via a socket connection. When a request is received it
processes it and sends back the answer set using the socket connection.
The IDBS package includes a perl object that handles the details of
sockets communication and data passing. IDBS is a multithreaded
application and is quite fast.
The second is my PerlASP. It is basically the same as the first except
that IDBS is replaced by an ASP page. The page is invoke as a URL
reference. This solution works fine too, except it requires ASP and it
is not as fast.
Send me an email if your interested.
Good luck,
Clinton
AcCeSsDeNiEd wrote:
> I have perl running on Unix
>
> Is there anyway I can access a MS Access database?
> The Access database can be hosted either on a Win32 or the Unix
> machine itself.
>
> I think this is not possible but I just need to be sure.
>
> Thanks!
> To e-mail me, remove "_rm"
>
> PGP Key on Keyservers
> Key ID: 0x27D16A6F
> Fingerprint: 8B3E DEF8 216E 04BD C12E 53AC 86F3 BCD6 27D1 6A6F
------------------------------
Date: Wed, 13 Oct 1999 07:57:02 +0200
From: Jens Onnen <onnen@heart-line.de>
Subject: ActivePerl/NT: crypt() not implemented ???
Message-Id: <38041F2E.EA36E423@heart-line.de>
Hi !
I am using ActivePerl on a NT3.51-system.
After implementing a perl forum software package, all seemed to work
fine. But when I tried to log in as admin, the following message
appeared:
"The crypt() function is unimplemented due to excessive paranoia. at
D:/xxx/yyy/source/src-board-subs-admin line 20."
Please help me !
Thank you in advance,
Jens Onnen.
------------------------------
Date: Wed, 13 Oct 1999 08:02:03 GMT
From: harris_m@my-deja.com
Subject: Re: ActivePerl/NT: crypt() not implemented ???
Message-Id: <7u1e9m$8mt$1@nnrp1.deja.com>
I don't get from your posting how are you logging as admin. I have
installed ActiveState Perl and crypt() function works just fine with me.
Are you using use strict ?
May be you can try using ::crypt() instead of just crypt()
Harris M.
In article <38041F2E.EA36E423@heart-line.de>,
Jens Onnen <onnen@heart-line.de> wrote:
> Hi !
>
> I am using ActivePerl on a NT3.51-system.
> After implementing a perl forum software package, all seemed to work
> fine. But when I tried to log in as admin, the following message
> appeared:
>
> "The crypt() function is unimplemented due to excessive paranoia. at
> D:/xxx/yyy/source/src-board-subs-admin line 20."
>
> Please help me !
>
> Thank you in advance,
>
> Jens Onnen.
>
>
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Wed, 13 Oct 1999 15:03:43 -0400
From: "Ethan H. Poole" <ehpoole@ingress.com>
Subject: Re: ActivePerl/NT: crypt() not implemented ???
Message-Id: <3804D78F.9D61E2D2@ingress.com>
harris_m@my-deja.com wrote:
>
> I don't get from your posting how are you logging as admin. I have
> installed ActiveState Perl and crypt() function works just fine with me.
>
> Are you using use strict ?
It sounds like the poster tried to compile the ActiveState distribution
themselves rather than use the precompiled binaries (perhaps they are
experimenting with threads or other experimental code). The crypt()
function is not provided in the distributed source because they are
concerned about ITAR export restrictions.
However, if the poster had taken the time to read the supporting
documentation available at ActiveState, they would have learned all of
this and that the source for the crypt() function can be downloaded from
overseas (as in 'outside of US') and re-incorporated into their Perl
binary. The complete instructions are available, all one has to do is
look.
--
Ethan H. Poole **** BUSINESS ****
ehpoole@ingress.com ==Interact2Day, Inc.==
(personal) http://www.interact2day.com/
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
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: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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 V9 Issue 1053
**************************************
