[11850] in Perl-Users-Digest
Perl-Users Digest, Issue: 5450 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Apr 22 08:07:56 1999
Date: Thu, 22 Apr 99 05:00:19 -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 Thu, 22 Apr 1999 Volume: 8 Number: 5450
Today's topics:
[Perl] How to find the Perl FAQ <rootbeer&pfaq*finding*@redcat.com>
Re: attach a subroutine to a filehandle <sb@sdm.de>
Re: FAQ 3.22: How can I compile my Perl program into by <Philip.Newton@datenrevision.de>
Re: FAQ 4.7: How do I perform an operation on a series <Philip.Newton@datenrevision.de>
Found it! (Re: Please, HELP with uninitialized value er <p.brouwer@prevalent.nl>
Re: Generating a unique string for order number (Andrea LN Spinelli)
grep look a like (Jorge A. Tavares)
Re: HELP : install a perl module within win95 <Philip.Newton@datenrevision.de>
how to embed C in Perl ? <evgenya@narn.cs.huji.ac.il>
Re: how to embed C in Perl ? <ebohlman@netcom.com>
Re: how to embed C in Perl ? <fmee@lfi.uni-hannover.de>
Re: Perl notation question? <Philip.Newton@datenrevision.de>
Re: Perl to display spreadsheet data (Andrea LN Spinelli)
Re: Problem installing Date::Calc on linux <sb@sdm.de>
Reading C binary data from disk <armchair@my-dejanews.com>
Re: Sort function (Christoph Schmitz)
Re: Sort function <gellyfish@gellyfish.com>
Re: Starting program via perl! <al-want@#--remove--#usa.net>
Re: T-shirt with potential Perl-logo <Philip.Newton@datenrevision.de>
Re: The Future of Tk? <fuzz@sys.uea.ac.uk>
Re: The Future of Tk? (Donal K. Fellows)
Re: Writing to syslog on Linux (Marc Haber)
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 22 Apr 1999 10:24:02 GMT
From: Tom Phoenix <rootbeer&pfaq*finding*@redcat.com>
Subject: [Perl] How to find the Perl FAQ
Message-Id: <pfaqmessage924776641.29334@news.teleport.com>
Archive-name: perl-faq/finding-perl-faq
Posting-Frequency: weekly
Last-modified: 10 Sep 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 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://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/
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: 22 Apr 1999 11:03:38 GMT
From: Steffen Beyer <sb@sdm.de>
Subject: Re: attach a subroutine to a filehandle
Message-Id: <7fmvma$abg$1@solti3.sdm.de>
[Posted && Mailed]
In article <slrn7hst32.bf.corey@valis.americanrecruitment.com>,
Corey Saltiel <corey@americanrecruitment.com> wrote:
> [...]
> How do I store/manipulate data from a subroutine which simply prints
> to STDOUT ( or prints due to a side affect - like when printing to a
> pipe that returns data ).
> Or:
> Is it possible to 'return' STDOUT into an array ( or something ) so
> I can step through it line-by-line, like what one would do with a
> filehandle?
> #!/usr/bin/perl
> @output = ( print "a few\nlines worth\nof\nstuff\n" );
^^
> foreach $value (@output) {
> print("line is \"$value\"\n");
> }
> What I'd *like* to see returned here is:
> line is "a few"
> line is "lines worth"
> line is "of stuff"
This should read
line is "of"
line is "stuff"
anyway due to the newline character above (see ^^ marker).
> But what I get instead is:
> a few
> lines worth
> of
> stuff
> line is "1"
> Seems that the assignment causes the code to run, then stores '1'
> ( success ) to @output ( $output[0] )...
> Not at all what I want.
>
> What do I got to do here? -- please refer me to any documentation,
> I'm sure I've managed to miss this particular ( simple ) feat in
> the docs somewhere.
> Many thanks for bearing with me on this!
Sounds like you want the Virtual File Manager "Data::Locations" which
does exactly what you want, if I'm not mistaken.
See my sig below for URLs where you can download this module.
(Current version is 4.3, but version 5.0 is coming out in the next few
days, probably on monday.)
You will also find the module's README file on the "download" page whose
URL is given below.
Hope this helps.
Regards,
--
Steffen Beyer <sb@engelschall.com>
http://www.engelschall.com/u/sb/whoami/
http://www.engelschall.com/u/sb/download/
http://www.perl.com/CPAN/authors/id/STBEY/
http://www.oreilly.de/catalog/perlmodger/bnp/
------------------------------
Date: Thu, 22 Apr 1999 12:34:51 +0200
From: Philip Newton <Philip.Newton@datenrevision.de>
To: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: FAQ 3.22: How can I compile my Perl program into byte code or C?
Message-Id: <371EFB4B.FB7A196E@datenrevision.de>
[courtesy cc of this posting sent to cited author via email]
Tom Christiansen wrote:
>
> In comp.lang.perl.misc,
> Philip Newton <Philip.Newton@datenrevision.de> writes:
> :s/miniscule/minuscule/
>
> The OED lists "miniscule" as an erroneous variation of minuscule, but
> goes on to offer cites dating back over a century, including reputable
> publications from both sides of the Atlantic:
[...]
And your point is?
Personally, I'd go with the "erroneous" bit of your quotes. Sure,
language changes, and "miniscule" is undoubtedly widely used, but it's
also widely considered incorrect. I'd vote for either changing it to
"minuscule" or something such as "tiny".
Cheers,
Philip
------------------------------
Date: Thu, 22 Apr 1999 13:16:24 +0200
From: Philip Newton <Philip.Newton@datenrevision.de>
Subject: Re: FAQ 4.7: How do I perform an operation on a series of integers?
Message-Id: <371F0508.202D0278@datenrevision.de>
Tom Christiansen wrote:
>
> To call a function on each integer in a (small) range, you can use:
>
> @results = map { some_func($_) } (5 .. 25);
>
> but you should be aware that the `..' operator creates an array of
> all integers in the range. This can take a lot of memory for large
> ranges. Instead use:
>
> @results = ();
> for ($i=5; $i < 500_005; $i++) {
> push(@results, some_func($i));
> }
I thought that there had been an optimisation recently for the special
case of for(1..500_005) which meant that Perl no longer creates a huge
array, but performs the equivalent of the for(;;) loop above (but with
the loop variable called $_). In which case the above caveat would no
longer hold *for for() loops*.
Cheers,
Philip
------------------------------
Date: Thu, 22 Apr 1999 11:34:32 +0200
From: "Pieter Brouwer" <p.brouwer@prevalent.nl>
To: comp.lang.perl.misc
Subject: Found it! (Re: Please, HELP with uninitialized value error)
Message-Id: <PRVL539BEA97@prevalent.nl>
L.S.
I just found the source of the error! In the sub CheckLine I used a regular
expression, in which I had three patterns I wanted to use ($1, $2 and $3). I
had to take further action on $3 but accidentally used $2, which was not
really defined in the strings. The place where the error was reported was
the place where that value was actually used.
Printing the value $2 from within the debugger gave me the same
error-message, so that's how I found it.
Pieter Brouwer heeft geschreven in bericht ...
>L.S.
>
>I am trying to write a rather simple perl-script to scan files for certain
>code-patterns. What I do seems very straightforward, but I get this error:
>
>Use of uninitialized value at a.pls line 360, <DEFILE> line 154.
>
>What happens in a.pls with respect to the mentioned filehandle is this:
>
> open DEFILE, "$file" || do {
> print OUTFILE "kan file $file niet openen; skipping\n";
> return;
> };
>
> print OUTFILE "Scanning (1) file $file ...\n";
> while ( $regel = <DEFILE> ) {
> $regelnummer = $.;
> &checkLine($regel,$file,$regelnummer);
> }
> close DEFILE;
>
>The linenumber of the error (360) has absoluteley nothing to do with
><DEFILE>. It doesn't even have anything to do with the sub checkLine. It
>always gives me the error on the first line (with the defined-statement) in
>this sub:
>
># add_var
>sub add_var {
> my $varnaam = shift;
>
> defined ($varlijst{$varnaam}) || ($varlijst{$varnaam} = 1);
>}
>
>no matter how I tossle the subs's around. So I don't think there is a
>problem with ; or }-mismatches.
>
>I must be overlooking something, but I have had enough staring at the code.
>Can somebody tell me what I am doing wrong?
>
>Thanks in advance
>
>Pieter Brouwer
>
>
>
------------------------------
Date: Thu, 22 Apr 1999 11:09:49 GMT
From: aspinelli@ismes.it (Andrea LN Spinelli)
Subject: Re: Generating a unique string for order number
Message-Id: <371efc48.11221440@news.iol.it>
On Wed, 21 Apr 1999 18:48:43 -0700, Greg McCann <gregm@well.com>
wrote:
>I'm working on an e-commerce application where I would like to generate a
>unique, mostly numeric string for a new order number.
>From what you say, you are asking for something
that will not help you. Application-oriented considerations
indicate that you do not need what you say...
Are you going to put the order data in a relational database?
In this case, exploit the ability of most RDB's to generate a
'serial' number for your order.
Are you going to use some flavour of tied hash / DBM?
Then you have to lock exclusively the file[s],
invent an order number,
check whether there is already an entry with that
number, guess another and repeat until you find a
good one, enter it in the hash, unlock the file[s].
In this case you could use
time() . ':' . (guess number)
Are you just appending orders to a text file?
In this case youll'have to lock the text file,
append the order data and unlock. In this
(unlikely) event, you could use
time . ':' . (records from the beginning of the file)
The n. of records may be obtained calling
'tell'
This assumes that when you process the file
and empty it, transactions are not allowed.
In case you are just cheating the user and
throwing away his/her data, you might use anything
you like... :)
If none of the above mentioned condition does
apply, you are left with the hard way:
initialise a file with content '1'.
whenever a request arrives, lock, read
content, use content as serial number,
increment, write back, unlock.
Sorry for the negative answer
Andrea
------------------------------
Date: 22 Apr 1999 11:18:02 GMT
From: jast@student.dei.uc.pt (Jorge A. Tavares)
Subject: grep look a like
Message-Id: <7fn0ha$746@morgana.mat.uc.pt>
Hello !
I have a small perl script gives me a list of on-line friends in a unix
machine. For that task I open a file with the logins and use finger to get
the list of everybody who is on. Then I use grep to give the finger lines
who have the persons I want. The problem is that grep searchs for a match in
the entire string and that's gives me a small bug ! If i have a friend which
the login is "elio" and there is another person called "delio" , whenever
"delio" is connected and "elio" not, it will give me "delio" and I don't
want it ! And of course, when the two are connected, it gives me the two !
My question is, is there anything that could solve me this problem ?
Below is my piece of code :
# ...
# $friend - login to find
# @fing - output of finger command
# foreach $friend (@_) {
$line = 0;
@result = 0;
@result = grep( /$friend/x, @fing);
}
If anybody could help I would be very gratefull.
Please, answers to my e-mail address.
Thanks in advance !
--
-= Jorge Tavares =-
-= jast@student.dei.uc.pt =- -= 0936 6669824 =-
-= CT2HFF=- -= http://student.dei.uc.pt/~jast =-
------------------------------
Date: Thu, 22 Apr 1999 13:14:22 +0200
From: Philip Newton <Philip.Newton@datenrevision.de>
Subject: Re: HELP : install a perl module within win95
Message-Id: <371F048E.9A8E5DA2@datenrevision.de>
fquihi@my-dejanews.com wrote:
>
> NB: the line command (ppm install VRML.ppd) doesn't work.
What do you mean by "doesn't work"? When you use this command, do
monkeys come flying out of your screen? Does your cursor turn blue? Does
every other line start to blink and your CD tray eject by itself?
What did you expect your input to do, and what did it actually do?
Cheers,
Philip
------------------------------
Date: 22 Apr 1999 09:33:46 GMT
From: Evgenya Borisenko <evgenya@narn.cs.huji.ac.il>
Subject: how to embed C in Perl ?
Message-Id: <7fmqdq$l8v$1@news.huji.ac.il>
Hi,
I'd like to know how can I use C and Perl together, I have a C library I
must use in my perl script. Is there any way i could connect them together?
Thanx in advance,
Bye
------------
Evgenya Borisenko
CS System Group
Hebrew University, Jerusalem, Israel
------------------------------
Date: Thu, 22 Apr 1999 10:22:10 GMT
From: Eric Bohlman <ebohlman@netcom.com>
Subject: Re: how to embed C in Perl ?
Message-Id: <ebohlmanFAL64y.E49@netcom.com>
Evgenya Borisenko <evgenya@narn.cs.huji.ac.il> wrote:
: I'd like to know how can I use C and Perl together, I have a C library I
: must use in my perl script. Is there any way i could connect them together?
Start by reading the perlxstut (manpage | HTML document | POD file),
which will give you an overview and point you to some other documents.
If you've got a copy of _Advanced Perl Programming_, read Chapter 18.
------------------------------
Date: Thu, 22 Apr 1999 12:51:29 +0200
From: Folkert Meeuw <fmee@lfi.uni-hannover.de>
Subject: Re: how to embed C in Perl ?
Message-Id: <371EFF31.A2378DAA@lfi.uni-hannover.de>
Hi,
which library you use SWIG or XS or own developed ?
With SWIG you can do work with graphics.
It works like:
=> swig -perl5 Fractal.i
and it generates wrappers for perl5.
MfG Folkert Meeuw
Evgenya Borisenko wrote:
> Hi,
> I'd like to know how can I use C and Perl together, I have a C library I
> must use in my perl script. Is there any way i could connect them together?
>
> Thanx in advance,
> Bye
> ------------
> Evgenya Borisenko
> CS System Group
> Hebrew University, Jerusalem, Israel
------------------------------
Date: Thu, 22 Apr 1999 12:55:14 +0200
From: Philip Newton <Philip.Newton@datenrevision.de>
Subject: Re: Perl notation question?
Message-Id: <371F0012.C3561FE6@datenrevision.de>
Wyzelli wrote:
>
> How can there be a phonetically correct way to pronounce an acronym?
Oh no, we had this thread on alt.usage.english a while back. Some people
consider "initialism" to mean "a word [an abbreviation] formed from the
initial letters of other words" [for example, FBI], and "acronym" to
mean "an initialism which can be pronounced as a word" [for example,
NATO]. So by this definition, all acronyms are easily pronouncable.
Others use "acronym" for the broader range of words which the first
group of people labels "initialism"; not all of those are pronouncable
and are often spelled out [as FBI] or given some contrived pronunciation
which nearly matches their spelling [such as SCSI, TMTOWTDI].
Cheers,
Philip
------------------------------
Date: Thu, 22 Apr 1999 11:09:48 GMT
From: aspinelli@ismes.it (Andrea LN Spinelli)
Subject: Re: Perl to display spreadsheet data
Message-Id: <371ef2bd.8777836@news.iol.it>
On Tue, 20 Apr 1999 10:13:45 GMT, vivekvp@yahoo.com wrote:
>I would like to take data from an excel spreadsheet and display in on a web
>page. I do not want the brower to ask to open an excel spreadsheet. I just
>want to take the spreadsheet data (in .xls) format, and use perl to reorganize
>to display on a web page - so any browser can view it.
Supposing you are on Win32 and have excel installed, and have
ActiveState perl 5.005_02 or higher, you could use the
Win32::OLE package.
The documentation is in
.../perl/html/lib/site/Win32/OLE.html
Find it, read it carefully. There are several Excel examples.
HTH
Andrea
------------------------------
Date: 22 Apr 1999 11:13:03 GMT
From: Steffen Beyer <sb@sdm.de>
Subject: Re: Problem installing Date::Calc on linux
Message-Id: <7fn07v$abg$2@solti3.sdm.de>
In article <7fmng7$ut1$1@nnrp1.dejanews.com>, agniora@usa.net wrote:
> installing the Date::Calc module on linux is getting difficult. the
> instruction says to switch to the directory called Date-Calc-4.2 (created by
> the tar file) and then perl Makefile.PL make make test make install
> and during the first instruction "perl Makefile.PL" it says
> WARNING: Setting VERSION via file 'Calc.pm' failed
> at (eval 1) line 288
> Writing Makefile for Date::Calc
> and then when i try the next three lines it gives so many warnings and errors
> i wont be able to list them all here.
Very strange!
> anyone knows what to do?
Not really.
Never seen this error message before.
What version of Perl do you have?
(Try "perl -V" (with a capital "V") and send me the output, ok?)
You might have a very old version of Perl, or your Perl installation
may be broken.
Did you install Perl yourself or are you using a precompiled Perl that
came with your Linux distribution?
Best regards,
--
Steffen Beyer <sb@engelschall.com>
http://www.engelschall.com/u/sb/whoami/
http://www.engelschall.com/u/sb/download/
http://www.perl.com/CPAN/authors/id/STBEY/
http://www.oreilly.de/catalog/perlmodger/bnp/
------------------------------
Date: Thu, 22 Apr 1999 10:28:15 GMT
From: Nigel Simon <armchair@my-dejanews.com>
Subject: Reading C binary data from disk
Message-Id: <7fmtjs$3oe$1@nnrp1.dejanews.com>
Is it possible to write out a C double (or int) using fwrite() and then open
that file and read the double value into a Perl scalar type - using just Perl
code??
--
Nigel
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 22 Apr 1999 10:09:33 GMT
From: schm4704@pcpb10.uni-trier.de (Christoph Schmitz)
Subject: Re: Sort function
Message-Id: <7fmsgt$rf1$1@fu-berlin.de>
Mohd Idaham (idaham@mimos.my) wrote:
: Hi,
: How do I sort a list based on column? For example, format for a given array
: is :
: aaaa bbbb 1111
: aaaa bbbb 1111...and so on..
perldoc -f sort
sort accepts a "custum comparing function" as an argument.
something like
sort { substr($a,10,5) <=> substr($b,10,5) } @array;
This would compare based on the substring from position 10 to position
14.
Christoph
--
**** Christoph Schmitz <cschmitz@stud.informatik.uni-trier.de> ****
The next time you look in the mirror, ask yourself how you'd feel if
you were a cat, and Earth was visited by something looking like you.
(Roger Ebert)
------------------------------
Date: 22 Apr 1999 11:48:51 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Sort function
Message-Id: <371efe93@newsread3.dircon.co.uk>
Christoph Schmitz <schm4704@pcpb10.uni-trier.de> wrote:
> Mohd Idaham (idaham@mimos.my) wrote:
> : Hi,
> : How do I sort a list based on column? For example, format for a given array
> : is :
> : aaaa bbbb 1111
> : aaaa bbbb 1111...and so on..
>
> perldoc -f sort
>
> sort accepts a "custum comparing function" as an argument.
>
> something like
>
> sort { substr($a,10,5) <=> substr($b,10,5) } @array;
>
> This would compare based on the substring from position 10 to position
> 14.
>
Except this is far from an optimal way of doing this. You want where
possible to avoid having to do anything tricky in the sort function -
using your column example for instance:
@array = map { $_->[1] }
sort { $a->[0] <=> $b->[0] }
map { [substr($_,10,5),$_] }
@array;
Instead of calling substr twice for each comparison in the sort - it is
only called once for each element - against which the overhead of the
maps is quite small.
You can read more about this in perlfaq4 :
How do I sort an array by (anything)?
And also in :
<http://language.perl.com/doc/FMTEYEWTK/sort.html>
/J\
--
Jonathan Stowe <jns@gellyfish.com>
------------------------------
Date: Thu, 22 Apr 1999 11:43:30 -0700
From: "Albert Want" <al-want@#--remove--#usa.net>
Subject: Re: Starting program via perl!
Message-Id: <371efd9e.0@nnrp1.news.uk.psi.net>
Will <unix244@ai.fh-nuernberg.de> wrote in message
news:371DB5C8.CF5530EF@ai.fh-nuernberg.de...
> Is there any command I can use for doing this. I have written a perl
> script which is checking a text file and depending on files contents it
> has to start the appropriate program.
system ("program");
or
`program`;
------------------------------
Date: Thu, 22 Apr 1999 12:51:37 +0200
From: Philip Newton <Philip.Newton@datenrevision.de>
Subject: Re: T-shirt with potential Perl-logo
Message-Id: <371EFF39.62198F52@datenrevision.de>
Ed Bogart wrote:
>
> RJRTC stands for R. J. Reynolds
> Tobacco Co. who makes Camel cigarettes which are mostly sold in third
> world countries.
Hmm, wonder what that makes Germany [where you can buy Camels]... :)
Cheers,
Philip
------------------------------
Date: Thu, 22 Apr 1999 10:54:08 +0100
From: "Farzad Pezeshkpour" <fuzz@sys.uea.ac.uk>
Subject: Re: The Future of Tk?
Message-Id: <7fmruj$gtm@cpca3.uea.ac.uk>
> I don't want to say that this is bad for Tcl users but what about all
> the other languages that use Tk? Isn't writting multiplatform GUI
harder
> using native components.
I don't think that implementing all widgets using custom code on all
platforms is 'lightweight' at
all. The issues about lightweight components for me are performance and
cross-platform
compatibility. By using native components, Tk has moved closer to this
goal. Yes, the differences in
look (and to some extent, feel) of components, when usig native widgets,
can be every-so-slightly
compromised - however, in the case of Tk, I don't find this a major
worry, irrespective of the
manner by which I access Tk (Tcl, Perl, C etc).
> I think Java made big step forward in
> abandoning the native components and using lightweight > ones in
Swing.
I've got a lot good words to say about Swing, but I don't think that
it's too smart to emulate the
<insert os/toolkit> look'n'feel on the same os/toolkit. The results are
typically a poor imitation
and always slow. It reminds me of the days when I used ParcPlace's
Smalltalk - very bad!
Fuzz
------------------------------
Date: 22 Apr 1999 10:52:52 GMT
From: fellowsd@cs.man.ac.uk (Donal K. Fellows)
Subject: Re: The Future of Tk?
Message-Id: <7fmv24$agu$1@m1.cs.man.ac.uk>
In article <371E964F.C531C2A@istar.ca>,
Eugene Dragoev <eugened@istar.ca> wrote:
> Is there going to be any Tk implementation that will continue using
> lightweight components?
No current Tk implementation uses lightweight components. All are
heavy (which actually merely means that they have their own window
each.) One of the things that might come out of the TkGS work at some
point may be lightweight components. There are other issues being
resolved there first though...
On the subject of what you thought lightweight components were: There
was a substantial discussion on this matter long ago (at the start of
the 8.0 cycle) and the decision was reached that what many people
actually wanted was not components that looked the same on all
platforms (they had that before and didn't like it) but rather
components that fitted in on the platform that they were being run
under at the time. Like that, an application that looks like it
belongs when running under Solaris/CDE also looks like it belongs when
running on Windows or on the Mac. We feel that this is a good thing,
and it is the business of making apps look (and eventually feel) like
they belong that is one of the major motivations of the TkGS project.
Or at least, that's the way *I* see and remember it. YMMV.
Donal.
--
Donal K. Fellows http://www.cs.man.ac.uk/~fellowsd/ fellowsd@cs.man.ac.uk
-- The small advantage of not having California being part of my country would
be overweighed by having California as a heavily-armed rabid weasel on our
borders. -- David Parsons <o r c @ p e l l . p o r t l a n d . o r . u s>
------------------------------
Date: Thu, 22 Apr 1999 11:08:10 GMT
From: Marc.Haber-usenet@gmx.de (Marc Haber)
Subject: Re: Writing to syslog on Linux
Message-Id: <7fmvsg$9o6$4@news.rz.uni-karlsruhe.de>
njc@dmc.uucp (Neil Cherry) wrote:
>On Wed, 21 Apr 1999 08:49:51 GMT, Marc Haber wrote:
>>Sys::syslog uses TCP/UDP (can't remember which and don't have a UNIX
>>system available in this hotel room). So you gotta run your syslogd to
>>accept network connections (man syslogd, it's a command line option).
>>
>>Be sure to firewall that port (513?) to prevent possible
>>Denial-Of-Service-Attacks if you run syslogd receiving network
>>connections.
>
>Thanks Marc, I have syslogd running and my logs receive entries from
>various programs.
There are many way to get through to syslog. Most programs running
locally don't use the socket interface. perl does. And the socket
interface has to be explicitly activated.
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: 12 Dec 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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 5450
**************************************
