[9349] in Perl-Users-Digest
Perl-Users Digest, Issue: 2944 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Jun 23 08:08:03 1998
Date: Tue, 23 Jun 98 05:00:49 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Tue, 23 Jun 1998 Volume: 8 Number: 2944
Today's topics:
[Perl] How to find the Perl FAQ <rootbeer&pfaq*finding*@redcat.com>
Re: About this <quednauf@nortel.co.uk>
Re: Appending to File1 from File2 <quednauf@nortel.co.uk>
Re: argc and argv <perlguy@inlink.com>
Building and installing TK 800.006 <Derek.Chaloner@rdl.co.uk>
Re: Hash iteration (trying to avoid looping through the <dformosa@st.nepean.uws.edu.au>
Re: How can I get the IP-Number & the Remote_Host Name <quednauf@nortel.co.uk>
Re: How to find last modified date of a file? (Mike Whitaker)
Re: how to write CGI scripts to connect form in HTML to <deeknow@pobox.com>
Re: how to write CGI scripts to connect form in HTML to <perlguy@inlink.com>
MD5 and Perl4 (Pel Lxberg)
Re: overriding open -- lets get this settled once and f <bernd@miraculix.dkrz.de>
Re: Remove blank too much lines from a text file <perlguy@inlink.com>
Re: rmdir and Windows NT 4.0 <Thomas.Kratz@lrp.de.nospam>
Re: Sending mail in Perl <quednauf@nortel.co.uk>
Re: system() and security again (Marc Haber)
Re: Taint again (Marc Haber)
Re: the @-sign (Garp)
Re: the @-sign <quednauf@nortel.co.uk>
Re: Weekdays <-> Dates <Tony.Curtis+usenet@vcpc.univie.ac.at>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 23 Jun 1998 10:24:01 GMT
From: Tom Phoenix <rootbeer&pfaq*finding*@redcat.com>
Subject: [Perl] How to find the Perl FAQ
Message-Id: <pfaqmessage898597441.20218@news.teleport.com>
Archive-name: perl-faq/finding-perl-faq
Posting-Frequency: weekly
Last-modified: 18 May 1998
[ 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 Spring of
1997; 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://cpan.perl.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://cpan.perl.org/
http://www.perl.com/CPAN/
http://cpan.perl.org/doc/FAQs/FAQ/html/perlfaq.html
http://www.perl.com/CPAN/doc/FAQs/FAQ/html/perlfaq.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: Mon, 22 Jun 1998 17:18:38 +0100
From: "F.Quednau" <quednauf@nortel.co.uk>
Subject: Re: About this
Message-Id: <358E83DE.1612C8ED@nortel.co.uk>
Terracini wrote:
>
> Hello,
> I would like to know about:
> Socket- STDIN/STDOUT and SERVER PUSH.
> If someone can tell me about...
http://abiglime.com/webmaster/articles/cgi/032498.htm
In there you will find an article on server push.
--
____________________________________________________________
Frank Quednau
http://www.surrey.ac.uk/~me51fq
________________________________________________
------------------------------
Date: Mon, 22 Jun 1998 16:20:27 +0100
From: "F.Quednau" <quednauf@nortel.co.uk>
Subject: Re: Appending to File1 from File2
Message-Id: <358E763B.61C7E182@nortel.co.uk>
Mark Rogers wrote:
>
> Hi,
>
> Could I get a few suggestions as to how one
> might append a results file to an archive file?
One way to start would be to search for 'file append perl' at deja news. This
will give you a whole load of previous postings that relate to this subject.
--
____________________________________________________________
Frank Quednau
http://www.surrey.ac.uk/~me51fq
________________________________________________
------------------------------
Date: Tue, 23 Jun 1998 11:31:40 GMT
From: Brent Michalski <perlguy@inlink.com>
Subject: Re: argc and argv
Message-Id: <358F921C.1C0E5BC8@inlink.com>
My article of CGI forms should help you out. It is located at:
http://www.webresource.net/cgi/articles/forms/index.html
I have moved on to www.webreview.com so all of my future articles will
be posted there.
I hope this helps you out!
Brent Michalski
------------------------------
Date: Tue, 23 Jun 1998 12:35:55 +0100
From: "Derek Chaloner" <Derek.Chaloner@rdl.co.uk>
Subject: Building and installing TK 800.006
Message-Id: <898601599.22118.0.nnrp-10.9e9821c6@news.demon.co.uk>
I am trying to install TK onto a Windows NT 4.0 SP3 platform.
I have successfully installed Perl 5.00467 into c:perl\5.00467\....
following the instructions.
TK 800.006 was successfully built and tested (I saw the boxes, buttons
flicker across the screen).
Here is the problem:- install generates a c:\lib directory and all of the TK
stuff is placed below. Other modules are also installed in c:\lib\... after
the standard sequence of :-
perl Makefile, nmake , nmake test, nmake install
This c:\lib is not on the @INC path and so the modules are not found.
Should c:\lib be in this path or is the perl build or tk build wrong.
Derek Chaloner
Racal-Datacom (SPS)
Work mailto:Derek.Chaloner@rdl.co.uk
Home mailto:derek@chaloner.globalnet.co.uk
------------------------------
Date: 23 Jun 1998 10:15:40 GMT
From: ? the platypus {aka David Formosa} <dformosa@st.nepean.uws.edu.au>
Subject: Re: Hash iteration (trying to avoid looping through the entire hash)
Message-Id: <898596940.437389@cabal>
In <358F18D4.7EF0@pdq.net> Tom Kent <tkent@pdq.net> writes:
>This script snippet allows me to parse a web server log and tell me how
>many times each site was hit. However, I am unable to capture just the
>top ten. Instead, I am only able to go through the entire hash. I've
>tried counters and for loops in various places with no luck...Any ideas?
>Thanks very much in advance.
#!perl
for $word (map {split ' '} <SOMEFILE>) {
$count{$word}++;
}
@topten=(map {$_->[1]}
sort {$b->[0] <=>$a->[0]}
map {[$count{$_},$_]}
keys %count)[0..9];
__EOF__
topten should now contain your top ten words.
--
I'm a perl programer; if you need perl programing, hire me.
Please excuse my spelling as I suffer from agraphia; see the url. Support NoCeM
http://www.cit.nepean.uws.edu.au/~dformosa/Spelling.html http://www.cm.org/
I'm sorry but I just don't consider 'because its yucky' a convincing argument
------------------------------
Date: Mon, 22 Jun 1998 15:38:10 +0100
From: "F.Quednau" <quednauf@nortel.co.uk>
Subject: Re: How can I get the IP-Number & the Remote_Host Name
Message-Id: <358E6C52.8065597@nortel.co.uk>
Alex T wrote:
>
> Hello...
> How can I get the IP-Number & the Remote_Host Name from a user who is
> running my
> CGI-Application?
A script lying around in my cgi-bin, I use it as a reference...
#!/opt/corp/local/perl-5.004/bin/perl5.00404 -w
#
# CGI script to print out the relevant environment variables.
# It's just one big print statement, but note the use of the
# associative %ENV array to access the environment variables.
#
print "Content-type: text/html
<head>
<title> CGI Tutorial: Environment variables script</title>
</head>
<body>
<hr>
<h1> Environment variables script</h1>
<hr>
<p>
Here are the environment variables that this CGI script has been
called with.
<p>
<hr>
<pre>
SERVER_SOFTWARE = $ENV{'SERVER_SOFTWARE'}
SERVER_NAME = $ENV{'SERVER_NAME'}
GATEWAY_INTERFACE = $ENV{'GATEWAY_INTERFACE'}
SERVER_PROTOCOL = $ENV{'SERVER_PROTOCOL'}
SERVER_PORT = $ENV{'SERVER_PORT'}
REQUEST_METHOD = $ENV{'REQUEST_METHOD'}
HTTP_ACCEPT = '$ENV{'HTTP_ACCEPT'}'
PATH_INFO = $ENV{'PATH_INFO'}
PATH_TRANSLATED = $ENV{'PATH_TRANSLATED'}
SCRIPT_NAME = $ENV{'SCRIPT_NAME'}
QUERY_STRING = $ENV{'QUERY_STRING'}
REMOTE_HOST = $ENV{'REMOTE_HOST'}
REMOTE_ADDR = $ENV{'REMOTE_ADDR'}
REMOTE_USER = $ENV{'REMOTE_USER'}
CONTENT_TYPE = $ENV{'CONTENT_TYPE'}
CONTENT_LENGTH = $ENV{'CONTENT_LENGTH'}
</pre>
<hr>
</body>"; # Print statement (and program) ends here
--
____________________________________________________________
Frank Quednau
http://www.surrey.ac.uk/~me51fq
________________________________________________
------------------------------
Date: 23 Jun 1998 11:01:35 GMT
From: mrw@malay.entropic.co.uk (Mike Whitaker)
Subject: Re: How to find last modified date of a file?
Message-Id: <slrn6ov2hg.h5i.mrw@malay.entropic.co.uk>
On Mon, 22 Jun 1998 16:56:26 +0100,
Richard G. Coleman <richard@see.my.sig> wrote:
>
>As it happens, my provider (Demon Internet UK) does not support perldoc
>from the terminal screen.
Um.
Your provider, as I recall, allows you to upload Perl scripts to your
webspace if you're a commercial customer. That's all. It doesn't
even provide shell access.
Can I strongly suggest getting your *own* copy of Perl to test your
CGI's with before you upload them?
--
Mike Whitaker: Sysadmin, Entropic Cambridge Research Labs
------------------------------
Date: Tue, 23 Jun 1998 23:26:52 +1200
From: "deeknow" <deeknow@pobox.com>
Subject: Re: how to write CGI scripts to connect form in HTML to MS Access
Message-Id: <6177ce$171ad.8e@RAHAB>
Buranee Putprasert wrote in message <6mnn1h$2f5$1@news-1.news.gte.net>...
>Right now I have to develop the web application for my class.
>Unfortunately I don't know how to do that. Now I have forms in HTML
>format and tables in MS Access. I don't know how to write CGI script
>using perl to add, delete, update, and query. If anyone knows how to,
>please feel free to give me the answer.
>P.S. I want to run this application on Windows 95/NT with MS Web
>Server(IIS4)
Hi Buranee,
If U *really* have your heart set on using PERL to manipulate an Access
database, then I'm sure U'll find something useful at either of the
following sites...
CGI-Resources
http://www.cgi-resources.com/Programs_and_Scripts/Perl/
Matt's Script Archive
http://worldwidemart.com/scripts/
But as your using IIS for your WWW server, why not use Active Server Pages.
There are examples of how to read/write to MS-Access ( or any other ODBC
accessable database for that matter ) at the following site...
ActiveServerPages.com
http://www.activeserverpages.com/database/
You should also follow the Active-Server-Pages newsgroup...
microsoft.public.inetserver.iis.activeserverpages
Good Luck,
Dean
--
>> B I Z T E K S U P P O R T Ltd <<
Supporting Business Technology in NZ
email: BizTek@pobox.com (Dean Stringer)
------------------------------
Date: Tue, 23 Jun 1998 11:35:42 GMT
From: Brent Michalski <perlguy@inlink.com>
Subject: Re: how to write CGI scripts to connect form in HTML to MS Access
Message-Id: <358F930E.87E75773@inlink.com>
GO to www.roth.net and look for ODBC. You will find what you need
there!
Brent
------------------------------
Date: 23 Jun 1998 13:21:51 +0200
From: pallo-njus@orakel.ntnu.no (Pel Lxberg)
Subject: MD5 and Perl4
Message-Id: <dt4k968nz1s.fsf@verden.pvv.ntnu.no>
Have anyone implemented MD5 checksums routines (primarily for
calculating MD5 checksums of files) in Perl4 without using external
programs?
I have used the MD5 module for Perl5, but need to do this in Perl4.
--
*********************** Pel Brovold Lxberg *********************
E-mail: pallo @ pvv.org WWW: http://www.pvv.org/~pallo/
****************************************************************
------------------------------
Date: Tue, 23 Jun 1998 13:48:40 +0200
From: Bernd Fischer <bernd@miraculix.dkrz.de>
Subject: Re: overriding open -- lets get this settled once and for all
Message-Id: <358F9618.41C67EA6@miraculix.dkrz.de>
Chris Pollitt wrote:
>
> Hello,
>
> What I'd like to write is a module that intercepts calls to open()
> and checks to see if the file about to be opened is a gzipped file
> and if so, gunzip it 'on the fly' using zcat.
>
> Here is my umteenth attenpt that still doesn't work:
...
why not
open FILE, "gzip -cdfq $filename |" or die "...";
and don't forget to check the return of close
Bernd
--
Bernd.Fischer@miraculix.dkrz.de
------------------------------
Date: Tue, 23 Jun 1998 11:34:14 GMT
From: Brent Michalski <perlguy@inlink.com>
Subject: Re: Remove blank too much lines from a text file
Message-Id: <358F92B6.D54D77B2@inlink.com>
You could easily do something like:
open(INFILE,"$filename");
open(OUTFILE,">$filename.out");
while(<INFILE>){
print $_ OUTFILE if($_ ne "");
}
close;
HTH,
Brent
------------------------------
Date: Tue, 23 Jun 1998 13:22:53 +0200
From: Thomas Kratz <Thomas.Kratz@lrp.de.nospam>
To: Kari.Marttila@tieto.com
Subject: Re: rmdir and Windows NT 4.0
Message-Id: <358F900D.6C73@lrp.de.nospam>
Kari Marttila wrote:
>
> Hi
>
> I am using Perl version 5.004_02 in Windows NT 4.0. I am using a simple
> Perl script to delete certain directories once a week. Every now and
> then some directories are not removed (but no error message is given). I
> can see the directories with Windows NT Explorer but if I try to see
> what's in there NT gives "access denied" message. Only after rebooting
> the NT the directories can be deleted manually. This same phenomena has
> occured with two NT machines. I am pretty sure that nobody is trying to
> use the directories at the same time. Does anyone has any idea what's
> going on? The script is here:
<perl script deleted>
I think this problem is not perl related at all. You seem to have
problems with your file system. I got the same behaviour with a
corrupted filesystem on an NT Server (with a buggy dir synch service
running).
I recommend checking the filesystem.
Hope this helps
Thomas
--
Thomas Kratz Landesbank Rheinland-Pfalz, Germany
Thomas.Kratz@lrp.de (remove 'nospam' from adress for mail)
------------------------------
Date: Mon, 22 Jun 1998 15:23:42 +0100
From: "F.Quednau" <quednauf@nortel.co.uk>
Subject: Re: Sending mail in Perl
Message-Id: <358E68EE.747073E7@nortel.co.uk>
> $^=q;@!>~|{>krw>yn{u<$$<[~||<Juukn{=,<S~|}<Jwx}qn{<Yn{u<Qjltn{ > 0gFzD gD,
> 00Fz, 0,,( 0hF 0g)F/=, 0> "L$/GEIFewe{,$/ 0C$~> "@=,m,|,(e 0.), 01,pnn,y{
> rw} >;,$0=q,$,,($_=$^)=~y,$/ C-~><@=\n\r,-~$:-u/ #y,d,s,(\$.),$1,gee,print
Odd, very odd. That program outputs:
#!/usr/bin/perl -- Russ Allbery, Just Another Perl Hacker
$^=q;@!>~|{>krw>yn{u<$$<[~||<Juukn{=,<S~|}<Jwx}qn{<Yn{u<Qjltn{ > 0gFzD gD,
00Fz, 0,,( 0hF 0g)F/=, 0> "L$/GEIFewe{,$/ 0C$~> "@=,m,|,(e 0.), 01,pnn,y{
rw} >;,$0=q,$,,($_=$^)=~y,$/ C-~><@=\n\r,-~$:-u/ #y,d,s,(\$.),$1,gee,print
Main Entry: ob7fus7cate
Pronunciation: 'db-f&-"skAt; db-'f&s-"kAt, &b-
Function: transitive verb
Inflected Form(s): -cat7ed; -cat7ing
Etymology: Late Latin obfuscatus, past participle of obfuscare, from Latin ob-
in the way + fuscus dark brown -- more at OB-, DUSK
Date: 1577
1 a : DARKEN b : to make obscure
2 : CONFUSE
- ob7fus7ca7tion /"db-(")f&s-'kA-sh&n/ noun
- ob7fus7ca7to7ry /db-'f&s-k&-"tOr-E, &b-, -"tor-/ adjective
--
____________________________________________________________
Frank Quednau
http://www.surrey.ac.uk/~me51fq
________________________________________________
------------------------------
Date: Tue, 23 Jun 1998 11:31:49 GMT
From: Marc.Haber-usenet@gmx.de (Marc Haber)
Subject: Re: system() and security again
Message-Id: <6mo3o1$d0p$2@nz12.rz.uni-karlsruhe.de>
Russ Allbery <rra@stanford.edu> wrote:
>Marc Haber <Marc.Haber-usenet@gmx.de> writes:
>> The docs say that system() uses a subshell if shell metacharacters are
>> contained in the command. I know ";", ">", "<", "|" and "`" as shell
>> metacharacters. Are there more?
>
>Yes. "(", ")", "*", "[", "]", "^", and possibly others, depending on your
>shell.
Are there others for a standard bash? If that differs from shell to
shell, parsing for metacharacters may be a major nuisance and using a
different shell will break that code :-(
>> Am I safe if I ensure that the command that I am passing to system()
>> does not contain metacharacters?
>
>Probably, but there's a better method. If you look at the documentation
>of system(), it refers you to exec(). Under the documentation of exec()
>is the following:
<snip>
>So you want to *always* pass system a list unless you're executing a
>simple command with no arguments. That way you'll never go through a
>shell regardless of what characters are in the arguments to the command.
That might be a good trick. Practical example:
system("/usr/bin/nice -n +15 /bin/tar -czf $target/$backupfile -X
$excludelist -g $incrlist / >/dev/null")
will clearly invoke a shell because of the redirection. So I'll have
to close stdin, stdout and re-open them to /dev/null before doing a
system("/usr/bin/nice -n +15 /bin/tar -czf $target/$backupfile -X
$excludelist -g $incrlist /").
This usually won't invoke a shell unless one of the interpolated
variables contains a metacharacter. The easy way of trying to prevent
a shell will be doing
system("/usr/bin/nice -n +15 /bin/tar -czf $target/$backupfile -X
$excludelist -g $incrlist /","")
to force list context. However, this won't work since system() expects
the list to be properly formed and simply invokes the first element,
passing the following elements as parameters, one element as one
parameter. So, I believe that
system("/usr/bin/nice","-n","+15","/bin/tar -czf $target/$backupfile
-X $excludelist -g $incrlist /")
would do what I want?
What could I do in a more general context? Obviously, splitting the
designated command line on white space into a list won't work since
that would have led to
system("/usr/bin/nice","-n","+15","/bin/tar","-czf","$target/$backupfile","-X","$excludelist","-g","$incrlist","/")
which probably won't work. While the "shell magic" of system() and
exec() seems a fine thing, it requires major tweaking in a security
relevant setting. Has it been consciously designed that way?
Greetings
Marc
--
-------------------------------------- !! No courtesy copies, please !! -----
Marc Haber | " Questions are the | Mailadresse im Header
Karlsruhe, Germany | Beginning of Wisdom " | Fon: *49 721 966 32 15
Nordisch by Nature | Lt. Worf, TNG "Rightful Heir" | Fax: *49 721 966 31 29
------------------------------
Date: Tue, 23 Jun 1998 11:31:48 GMT
From: Marc.Haber-usenet@gmx.de (Marc Haber)
Subject: Re: Taint again
Message-Id: <6mo3nv$d0p$1@nz12.rz.uni-karlsruhe.de>
Russ Allbery <rra@stanford.edu> wrote:
>Marc Haber <Marc.Haber-usenet@gmx.de> writes:
>> I am far from being a perl wizard, so if that code contains some
>> clumsiness, I'd like to know what I could do better.
>
>The major clumsiness is that you're reinventing File::Find for no
>particularly good reason.
I must be really stupid. Why the hell have I not been using a Module
that I know exists? I even used it half a year ago. Thanks!
>(you're not dealing with symbolic links, for example).
This might be a lesson not to copy code from Windows to Unix :-)
>> Also, I am still an apprentice when it comes to Unix security.
>
>I hope you're not giving people a setuid tool to do rm -rf....
Alas, No! I might be stupid, but not that stupid. If you are refering
to my other question - that originated from the same project, but a
different position :-)
>(in
>other words, using them as an argument to rmdir or unlink should be fine,
>but doing anything else with them is questionable).
Thanks, that's what I wanted to hear.
>> I clearly cannot untaint the parameter passed in at the very beginning
>> since I will be throwing the gained security away again. Which checks do
>> I have to do before I can safely untaint the parameter that is passed in
>> to me?
>
>What's the code trying to do and how much can you constrain it?
I do not understand that question clearly. But that might not be
important any more since I might have to rewrite it using File:Find
anyway.
Thanks for your comments, I'll be back.
Greetings
Marc
--
-------------------------------------- !! No courtesy copies, please !! -----
Marc Haber | " Questions are the | Mailadresse im Header
Karlsruhe, Germany | Beginning of Wisdom " | Fon: *49 721 966 32 15
Nordisch by Nature | Lt. Worf, TNG "Rightful Heir" | Fax: *49 721 966 31 29
------------------------------
Date: Tue, 23 Jun 1998 11:20:20 GMT
From: garp@callscan.com.nospam (Garp)
Subject: Re: the @-sign
Message-Id: <358f8f0d.330488126@news.demon.co.uk>
On Mon, 22 Jun 1998 15:20:59 +0100, Robert Rehammar
<Robert.Rehammar@emw.ericsson.se> wrote:
>Hi !
>
>We'r two newbees on Perl wondering what the @-sign ahed of a variable
>means ??
>
>If anyone could point us to any _GOOD_ book on the web we'd be greatful
>!
>
>answer to: robert.rehammar@emw.ericsson.se
>
>Robert Rehammar
http://cpan.perl.org/doc/FAQs/
Heck, read the whole thing, why not.
HTH
Garp
------------------------------
Date: Mon, 22 Jun 1998 15:48:55 +0100
From: "F.Quednau" <quednauf@nortel.co.uk>
Subject: Re: the @-sign
Message-Id: <358E6ED7.CFE9AF0F@nortel.co.uk>
Real wrote:
=
> It means that the variable is an array. There are some more;
> $ - scalar
> @ - array
> % - hash
> & - function
> * - reference
^ ^^^^^^^^^
Excuse me?!? If this is true, it must be a completely undocumented feature. But
Bill Gates hasn't got to do anything with Perl, or has he? I thought those
thingies refer to typeglobs, used eg as *thingy, to refer to $thingy, @thingy,
etc... Can this be called a reference? I thought that the dreaded '*' is a
pointer in C.
> Use see the perlref manual (man perlref) for more information about this
> item.
>
> A lot of very good information can be found at http://www.perl.com (look
> at the column at the left side of the page).
>
> Good luck,
> Real
--
____________________________________________________________
Frank Quednau
http://www.surrey.ac.uk/~me51fq
________________________________________________
------------------------------
Date: 23 Jun 1998 13:08:12 +0200
From: Tony Curtis <Tony.Curtis+usenet@vcpc.univie.ac.at>
Subject: Re: Weekdays <-> Dates
Message-Id: <7xaf749y03.fsf@beavis.vcpc.univie.ac.at>
Re: Weekdays <-> Dates, Hauk <hauk@forumnett.no> said:
Hauk> Hi there. I'm about to make a program which needs to
Hauk> know which day of the week it is. I have a good idea
Hauk> about how to do it, but it feels like an unescesary
Hauk> amount of work. If anyone know somewhere I can find a
Hauk> model on how to do this, or maybe have a subroutine
Hauk> they have made themselfes, I would really apprecuate
Hauk> to have a look at it. Thanks.
perldoc Date::Manip
perldoc Date::DateCalc
if you don't have them, get them from CPAN.
--
Tony Curtis, Systems Manager, VCPC, | Tel +43 1 310 93 96 - 12; Fax - 13
Liechtensteinstrasse 22, A-1090 Wien, AT | http://www.vcpc.univie.ac.at/
"You see? You see? Your stupid minds! Stupid! Stupid!" ~ Eros, Plan9 fOS.
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
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.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
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.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
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 V8 Issue 2944
**************************************
