[6677] in Perl-Users-Digest
Perl-Users Digest, Issue: 302 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Apr 15 01:17:17 1997
Date: Mon, 14 Apr 97 22:00:24 -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 Mon, 14 Apr 1997 Volume: 8 Number: 302
Today's topics:
Re: "rename" PLEASE HELP!!! (Jeff Stampes)
001 to 003 select(rin, win, ein, time) call problem (Alan Rykhus)
Re: == equality comparism (Jeff Stampes)
Re: A Program to List All Dirs/SubDirs (Nathan V. Patwardhan)
Re: CGI : How to download exe file using Perl ? (Geoffrey Hebert)
Re: convert a char into ASCII (Tim Gim Yee)
Re: Crypt function doesn't appear to work (I R A Aggie)
Re: Formating printouts (Geoffrey Hebert)
Re: Help! Calling PERL from HTML... <mgjv@comdyn.com.au>
Re: How to set the time? <tchrist@mox.perl.com>
Re: Installing Perl5.003 <Swedek@postoffice.worldnet.att.net>
Re: Installing Perl5.003 <Swedek@postoffice.worldnet.att.net>
Keyboard command output from Perl? <broomer2@primenet.com>
Re: Kudos to Tom Christiansen and problems with OO <tchrist@mox.perl.com>
Re: Newbie Question: regexp email address.. (Kevin Johnson)
Re: Ousterhout and Tcl lost the plot with latest paper <Chris.Bitmead@alcatel.com.au>
Re: Parsing file problem (Craig Berry)
Re: Perl on Sco System V (Danny Aldham)
Re: print question (David Alan Black)
QUESTION: Class::Template variable access (Terrence M. Brannon)
Ramdrive <ggut@Cip.Physik.Uni-Wuerzburg.DE>
Save money!!! <datamax@j51.com>
Re: SLEEP (.5) ??? (Scott)
Re: Unix and ease of use (WAS: Who makes more ...) (Mandr)
Re: Unix and ease of use (WAS: Who makes more ...) <troll@net-link.net>
Re: Why is $Line=~ s///; erasing = <tchrist@mox.perl.com>
Re: Why is $Line=~ s///; erasing = (David Alan Black)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 14 Apr 1997 22:31:12 GMT
From: stampes@xilinx.com (Jeff Stampes)
Subject: Re: "rename" PLEASE HELP!!!
Message-Id: <5iub7g$l0b$1@neocad.com>
Buzz (shommel@elk.uvm.edu) wrote:
: I declared two variables with complete pathnames to the files:
Those complete pathnames are on the same filesystem I hope?
rename (much like unix's mv) will not work across filesystem
boundaries.
: $var1 = ("path/to/file1");
: $var2 = ("path/to/file2");
Why all the line noise? Parens usually designate a list context,
they're not needed...and if you aren't interpolating variables,
single quotes will probably suffice.
: rename ("$var1", "$var2");
More noise...the quotes aren't needed here.
: yet it does nothing? How come? How can I make it work?
conceptually, there's nothing wrong with what you're doing:
fappy 568: touch /tmp/foo
fappy 569: ls -l !$
ls -l /tmp/foo
-rw-rw-rw- 1 tester boulder 0 Apr 14 16:24 /tmp/foo
fappy 570: perl -de 1
DB<1> $from = '/tmp/foo'
DB<2> $to = '/tmp/bar'
DB<3> rename ($from,$to)
DB<4> q
fappy 571: ls -l /tmp/{foo,bar}
/tmp/foo: No such file or directory
-rw-rw-rw- 1 tester boulder 0 Apr 14 16:24 /tmp/bar
Your problem probably comes from one of two sources:
- you're renaming across filesystem boundaries
- some other cgi-type issue, which I know nothing about.
Good Luck,
Jeff
--
Jeff Stampes -- Xilinx, Inc. -- Boulder, CO -- jeff.stampes@xilinx.com
------------------------------
Date: 15 Apr 1997 00:02:45 GMT
From: rykhus@vax1.mankato.msus.edu (Alan Rykhus)
Subject: 001 to 003 select(rin, win, ein, time) call problem
Message-Id: <5iugj5$4tv$1@nitrogen.mankato.msus.edu>
I work at PALS on the Webpals project and we are in the
process of updating our perl5.001 to perl5.003. We
successfully installed perl5.003 but we have a problem
with our script of which I can't seem to find an answer
to. We use a select call in case we have problems with
our mainframe. Perl5.001 has no problems, but perl5.003
doesn't seem to support the select call. I wrote a
simple test script:
print("Hello world\n");
select(undef, undef, undef, 1);
print("Hello world I'm back\n");
This script works under perl5.001 but returns the
following message on perl5.003:
"Hello world"
"select not implemented at test.pl line 6."
Any guidance would be appreciated.
Al Rykhus
rykhus@krypton.mankato.msus.edu
------------------------------
Date: 14 Apr 1997 22:34:38 GMT
From: stampes@xilinx.com (Jeff Stampes)
Subject: Re: == equality comparism
Message-Id: <5iubdu$l0b$2@neocad.com>
THIAM YEO (n1835173@sparrow.qut.edu.au) wrote:
: Does Perl have the opposite of the equality comparism ==? != and <>
: doesn't seems to work.
What doesn't work for you?
fappy 572: perl -e 'print "Not Equal\n" if (1 != 2)'
Not Equal
You aren't trying to use != on strings are you?
numbers strings
== eq ## Equality
!= ne ## Inequality.
--
Jeff Stampes -- Xilinx, Inc. -- Boulder, CO -- jeff.stampes@xilinx.com
------------------------------
Date: 15 Apr 1997 00:47:35 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: A Program to List All Dirs/SubDirs
Message-Id: <5iuj77$lji@fridge-nf0.shore.net>
wayne t. watson (wayne@netcom.com) wrote:
: Anyone have a simple program to list all
: the directories and subdirectories below a given
: directory? Maybe something like:
You can use File::Find / find2perl like:
find2perl /path -type d -print
--
Nathan V. Patwardhan
nvp@shore.net
------------------------------
Date: Tue, 15 Apr 1997 03:47:22 GMT
From: soccer@microserve.net (Geoffrey Hebert)
Subject: Re: CGI : How to download exe file using Perl ?
Message-Id: <5iuso5$m74$2@news3.microserve.net>
I plan to do the same thing in the near future.
I was planning to make a file. You do know how to do that.
Then send the location redirection as follows:
print "Content-type: text/html\n";
print "Location: $datafile\n\n";
I am guessing that it will work. Let me know if it works.
Doron Raz <datatech@netvision.net.il> wrote:
>On our home page we would like to place a button that will create a file
>and right after the file was created will download it to the user
>computer .
>Is there anybody how knows how to preform this using perl as CGI script?
>Thanks,
>Doron
Check out the Perl site!
http://www.microserve.net/~soccer/
use password perlmisc
Geat tool for Developers>
------------------------------
Date: Tue, 15 Apr 1997 01:10:09 GMT
From: tgy@chocobo.org (Tim Gim Yee)
Subject: Re: convert a char into ASCII
Message-Id: <3352d51f.31854013@news.seanet.com>
On Mon, 14 Apr 1997 14:25:15 -0400, Rachel Mackenzie
<rachel@cbogate.peel.edu.on.ca> wrote:
>How do you change a character to ascii???
>
>how do you change ascii to character????
print chr ord 'A'; # :)
-- Tim Gim Yee tgy@chocobo.org
http://www.dragonfire.net/~tgy/moogle.html
"Will hack perl for a moogle stuffy, kupo!"
------------------------------
Date: Mon, 14 Apr 1997 09:19:48 -0500
From: fl_aggie@hotmail.com (I R A Aggie)
Subject: Re: Crypt function doesn't appear to work
Message-Id: <fl_aggie-ya02408000R1404970919480001@news.fsu.edu>
In article <8c67xqk4c5.fsf@gadget.cscaper.com>, Randal Schwartz
<merlyn@stonehenge.com> wrote:
+ Would that make me the [Randal] Phanum of the Opera-tor?
[groan] If you weren't such a wizard, I'd make the motion to tar-n-feather
you...
James - tar cvf feather.tar /randal ?
--
Consulting Minster for Consultants, DNRC
To cure your perl CGI problems, please look at:
<url:http://www.perl.com/perl/faq/idiots-guide.html>
------------------------------
Date: Tue, 15 Apr 1997 03:59:26 GMT
From: soccer@microserve.net (Geoffrey Hebert)
Subject: Re: Formating printouts
Message-Id: <5iuteo$mop$1@news3.microserve.net>
So, make the table's width shorter.
table
data a, b, c, d, e, f, g, h
too long
make it
data a, b, c, d
e, f, g, h
You can have two lines like this.
another way would be to have a selection
screen followed by shorter screens
select data a or e
data a, b, c, d (selected a)
select data a or c
data e, f, g, h
I had the same problem for a soccer league.
see solution
http://www.microserve.net/~soccer/casl
Paulo Bellem <coop5b30@nortel.ca> wrote:
>Sorry if this is a repeat post.
>I have a script(Perl) which prints out information on people into table
>formats on the web. The problem exists when I want ot print these
>tables. The width of the tables become to large and the printoff is
>cutoff. How can I make it so that the table fits onto the entire page.
>What I would really like is that the beginning of each table begin on a
>new page but for now I just want the table to fit nicely width-ways on
>the page. Can anyone help me with this.
>Also is it possible to print/format the table information inot a Adobe
>document. This way the user would only have to hit a button and the
>Adobe document would appear ready to be printed. The Document should
>still follow the format mentioned above. Thank you.
>Paulo Bellem
>Coop5b30@nortel.ca
Check out the Perl site!
http://www.microserve.net/~soccer/
use password perlmisc
Geat tool for Developers>
------------------------------
Date: Tue, 15 Apr 1997 12:36:00 +1000
From: Martien Verbruggen <mgjv@comdyn.com.au>
To: Pete Cion <pcion@vfi.com>
Subject: Re: Help! Calling PERL from HTML...
Message-Id: <3352E990.7568@comdyn.com.au>
Pete Cion wrote:
>
> Hello!
>
> I am testing a procedure where I call a PERL script from an HTML script,
> and the PERL script is not executing.
Don't be offended by the name, but read The Idiot's Guide to Solving
Perl CGI Problems.
http://www.perl.com/CPAN/doc/FAQs/cgi/idiots-guide.html
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | "In a world without fences,
Commercial Dynamics Pty. Ltd. | who needs Gates?"
NSW, Australia |
------------------------------
Date: 15 Apr 1997 00:33:12 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: How to set the time?
Message-Id: <5iuic8$ajq$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
posenj@lancet.co.za writes:
:I know how to get the time with localtime() and gmttime(), but how do I set
:the current time of the computer?
Become the superuser, and read the date(1) man page, not necessarily
in that order.
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
But you have to allow a little for the desire to evangelize when you
think you have good news.
--Larry Wall in <1992Aug26.184221.29627@netlabs.com>
------------------------------
Date: 15 Apr 1997 01:43:08 GMT
From: Shelly <Swedek@postoffice.worldnet.att.net>
To: mcravit@shell3.ba.best.com
Subject: Re: Installing Perl5.003
Message-Id: <5iumfc$gn@mtinsc05.worldnet.att.net>
How can I tell if I have a gcc CC c compiler? I am trying to install
Perl5.003 and when I get to the part where you type "make (return)"
it says I'm missing files: in.h, stat.h, timer.h termios.h, sockios.h,
limits.h, and dirent.h. Then it says "make *** [miniperlmain.o] Error 1.
Dan AH6NW
------------------------------
Date: 15 Apr 1997 01:56:06 GMT
From: Shelly <Swedek@postoffice.worldnet.att.net>
To: mcravit@shell3.ba.best.com
Subject: Re: Installing Perl5.003
Message-Id: <5iun7m$gn@mtinsc05.worldnet.att.net>
I think I may be having a similar problem installing Perl5.003. Maybe
you can help me out. I did sh Configure -des, then it finished and said
to do "make." When I did "make" it said I was missing files: in.h
stat.h, times.h, termios.h, sockios.h, limits.h and dirent.h. Then it
said "make *** [miniperlmain.o] Error 1" So I did "make install"
anyway just to see what would happen. When it was done I did "perl -v"
to see if perl had been installed and it said "bash: perl - command not
found." Is this similar to the problems you were having? I am using
a 486 with a linux partition on my hard drive. I downloaded Perl5.003
from the internet via AT&T Worldnet then mounted my msdos partition
from the linux partition and copied over the latest_t.gz file. Then
I made a directory /perl and moved latest_t.gz there and did gunzip on
it then tar -xvf latest_t which exploded into a bunch of files. Then
I did "sh Configure -des." So do I also need a c compiler or did I do
something else wrong?
Dan AH6NW
------------------------------
Date: 13 Apr 1997 21:08:06 -0700
From: Rodney Broom <broomer2@primenet.com>
Subject: Keyboard command output from Perl?
Message-Id: <33519F09.544B@primenet.com>
I read in the Perl FAQ that keyboard commands in Perl were dependant on
the system that was being written for. Unfortunately, I didn't see
anything else, (like how to do this at all) and have had no luck looking
in my book on Perl.
Any thoughts?
Rodney
--
To all:
Please, visit my home page at
http://www.primenet.com/~broomer2/index.html
And, please, feel free to send me your
comments and/or critiques.
------------------------------
Date: 15 Apr 1997 03:00:13 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Kudos to Tom Christiansen and problems with OO
Message-Id: <5iuqvt$mu6$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, will@Starbase.NeoSoft.COM (Will Morse) writes:
:I just thought I'd mention that Tom is also an outstanding pianist.
Not as good a pianist as Larry is a violinist.
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
X-Windows: graphics hacking :: roman numerals : sqrt(pi)
--Jamie Zawinski
------------------------------
Date: 14 Apr 1997 07:49:01 -0700
From: kjj@primenet.com (Kevin Johnson)
Subject: Re: Newbie Question: regexp email address..
Message-Id: <5itg4t$fud$1@nnrp01.primenet.com>
Ask Bjxrn Hansen <ask@plys.net> wrote:
>Sorry about the newbie posting .. but:
>
>What's the best way to get an email address from a line like:
>
>From: John Doe <jd@foo.com>
>or
>From: jd@foo.com
>or
>From: jd@foo.com (John Doe)
>
>I only want to jd@foo.com part in either case..
I recommend taking a look at the MailTools package available in CPAN.
It has a routine for exactly that.
--
thx,
kjj@pobox.com http://www.pobox.com/~kjj/
------------------------------
Date: 15 Apr 1997 12:26:24 +1000
From: Chris Bitmead <Chris.Bitmead@alcatel.com.au>
Subject: Re: Ousterhout and Tcl lost the plot with latest paper
Message-Id: <s6y3est58dr.fsf@aalh02.alcatel.com.au>
alaric@abwillms.demon.co.uk (Alaric B. Williams) writes:
> How do you defined "power"? I have seen two definitions in languages:
>
> 1) Low level, meaning you have the "power" to control implementation.
> C fans cite this definition to me, mostly.
>
> 2) High level, meaning you can do major things with simple,
> descriptive bits of code. Functional language fans cite this
> definition to me, mostly!
I personally would definitely go with 2) as the correct definition. 1)
has it's uses but I wouldn't call that general purpose
"power". According to that definition, assembler is a super-powerful
language. To me this is absurd. Assembler has it's uses, but powerful
isn't an adjective I'd use.
> Well, I'd suggest calling them "low level power" and "high level
> power" respectively. Well, I really can't standing drawing ASCII art,
> so I'll make a subjective ranking of language powers:
>
> Low Level Power:
>
> 1) C++
Ok, most people would put C++ first in the so-called "low-level" power
stakes. But it doesn't all go C++'s way. You define low level power as
the power to control implementation. Consider that C++ is a strictly
stack based language. Unlike Scheme, (or assembler with some tricky
mucking around), you can't have multiple "stack-like" environments all
existing at once. (i.e. continuations and call/cc).
This is a powerful low level feature that C took away from assembler,
but Scheme allows.
> 2) Scheme
> 3) TCL
>
> Why? Well, with Scheme, you get more control over data representation
> than with TCL (choose from: number, symbol, string, list, ...), and I
> doubt anyone will disagree with putting C++ at the top :-)
I only agree in so far as you could care about implementation. If you
let the language choose how to implement it, I would definitely
no-longer put it at the top.
> High Level Power:
>
> 1) ?
> 2) ?
> 3) C++
In the high level power stakes, I think we must still put TCL last. If
we take your definition of being able to do major things with simple
pieces of code, I think TCL lacks the ability to do major things. TCL
can nicely _control_ major things, where those major things are
implemented in say C, but it can't nicely _implement_ major things.
Or to put it another way, /bin/sh can control processes very
succincty, and in that sense you can do powerful things in a small
space. But as a language it is very weak.
So.. 1) Scheme 2) C++ (reluctantly) 3) TCL.
The extent to which TCL is "powerful" is basicly because it is
typeless. It gives programmers the illusion that they can do a lot
without a lot of preparation and mucking around. This is a good thing!
But I wouldn't like to sacrifice true language "power" to get it if I
didn't have to.
> I don't know much TCL, so I can't be sure here. I mean, does TCL do
> closures? I guess you can pass strings of code around, but can these
> strings close over their environments... and how about CPS? Can a TCL
> function/procedure/subroutine/insert correct term get hold of a string
> representing the future of it's invoking computation, which it can
> then execute as a string of source? I guess it's possible, but is it
> done?
------------------------------
Date: 15 Apr 1997 00:05:49 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Parsing file problem
Message-Id: <5iugot$fkq$2@marina.cinenet.net>
Simon Hyde (aka Jeckyll) (shyde@poboxes.com) wrote:
: On Thu, 27 Mar 97 17:34:00 GMT, ab20@tntvax.ntrs.com wrote:
:
: >I have a file with the following record:
: >
: >|1997-02-13 00:00:00:000|N|NULL |NULL |XYZ |NULL|JKL |NULL |123
: >
: >My output should look like this:
: >
: >|1997-02-13 00:00:00:000|N|||XYZ ||JKL ||123
: >
: >Basically I'm just stripping the word "NULL" and any trailing spaces before
: >the next delimiter "|". Is there a way using awk or perl to accomplish this?
: A nice perl solution:
: open(INFILE, 'input');
: open(OUTFILE, 'output');
: while (<INFILE>){
: s/\|\s*NULL\s*\|/\|\|/g;
: print OUTPUT;
: }
A minor quibble: The poster requested only "NULL with *trailing*
spaces", not leading. Also, no need to escape the | chars on the
right-hand side of the substitution. So, your s/// line becomes:
s/\|NULL\s*\|/||/g;
which is a bit easier on the eye, and closer to the spec.
---------------------------------------------------------------------
| Craig Berry - cberry@cinenet.net
--*-- Home Page: http://www.cinenet.net/users/cberry/home.html
| Member of The HTML Writers Guild: http://www.hwg.org/
"Every man and every woman is a star."
------------------------------
Date: 14 Apr 1997 21:38:54 -0700
From: danny@hendrix.postino.com (Danny Aldham)
Subject: Re: Perl on Sco System V
Message-Id: <5iv0ou$7lp@hendrix.postino.com>
Dan Clark (dclark@mail.basis.com) wrote:
: Has anyone got Perl 5 running on SCO SV5. I'm having a heck of a time
: getting a good make going. Any suggestions, experience, etc. would be
: greatly appreciated.
If you mean on SCO OpenServer5, try making it with Robert Lipes gcc,
rather than the stock SCO cc. When you run Configure select sco for
system type, and then just carriage return to select all the other
defaults. It _does_ compile OK as is. Don't try to get dynamic linking
going at first. If you get stuck, take a look at ftp.sco.com for a
custom installable version, or at ftp.celestial.com for a package
that will install with just make install.
--
Danny Aldham SCO Ace, MCSE www.postino.com
------------------------------
Date: 15 Apr 1997 01:57:02 GMT
From: dblack@icarus.shu.edu (David Alan Black)
Subject: Re: print question
Message-Id: <5iun9e$1b3@pirate.shu.edu>
Hello -
Johannes Lipp <lipp@tunix.mathematik.uni-stuttgart.de> writes:
>Hello,
>I have the following problem:
>the script
> #! /usr/bin/perl -w
> print STDOUT ("whats\n",
> "that?\n");
>produces no warning output,
>but the script
> #! /usr/bin/perl -w
> print ("whats\n",
> "that?\n");
>produces a warning about print interpreted as a function.
>Now I think this is aesthetically unpleasant.
>Can anybody explain this to me?
See Camel, pp. 141-142. In the first example, since the first
argument is not in parentheses, print is interpreted as a list
operator, whereas in the second example it is interpreted as
a function, which has an impact on precedence (although in
these cases, that won't enter into it).
David Black
dblack@icarus.shu.edu
------------------------------
Date: 14 Apr 1997 17:06:48 -0700
From: brannon@bufo.usc.edu (Terrence M. Brannon)
To: brannon@bufo.usc.edu
Subject: QUESTION: Class::Template variable access
Message-Id: <ysizhgh9up2s.fsf@bufo.usc.edu>
Given the following Class::Template struct:
struct a => [
'm' => '$',
'n' => '$',
];
and lets say $u = new a;
How can I indirectly reference the fields of $u?
Such as $index = m
a> $u->$index(200);
a> print $u->$index;
200
a>
--
o============o Sending unsolicited commercial e-mail (UCE) to this address
Legal Notice is indication of your consent to pay me $120/hour for 1 hour
o============o minimum for professional proofreading & technical assessment.
terrence brannon * brannon@kappa.usc.edu * http://rana.usc.edu:8376/~brannon
------------------------------
Date: Mon, 14 Apr 1997 16:21:08 +0200
From: Guenter Guttroff <ggut@Cip.Physik.Uni-Wuerzburg.DE>
Subject: Ramdrive
Message-Id: <Pine.HPP.3.92.970414162019.25060A-100000@wpax22.physik.uni-wuerzburg.de>
Anyone knows anything about a ramdrive-program for Win95/WinNT4.0?
Thanx,
Guenter
------------------------------
Date: 15 Apr 1997 01:03:49 GMT
From: S.P., Woodring<datamax@j51.com>
Subject: Save money!!!
Message-Id: <5iuk5l$okg$6530@news.j51.com>
Do you have a car?
Do you like music on the go?
Have you given any thought about upgrading the car stereo system?
If you have answered yes to any of these questions,
Go to http://www.j51.com/datamax/prod01.htm
Guaranteed, I can save you a great deal of money.
Sincerely,
SP, Woodring
______________________________________________________
I know everyone is looking for a way to save money.
Should this not be of interest to you, Please forward it to
a friend who needs it.
This is a promotion for "What you should know before you
install your car stereo system" A booklet written by SP, Woodring.
______________________________________________________
----------------------------------------------------------------------
This message is being brought to you by Dynamic Mail - the easier and faster
way to explode your business on the internet. For more information please
visit our web site at : http://members.tripod.com/~apexpi/
----------------------------------------------------------------------
------------------------------
Date: Mon, 14 Apr 1997 20:42:19 GMT
From: seligman@netcom.com (Scott)
Subject: Re: SLEEP (.5) ???
Message-Id: <seligmanE8nAuJ.G8s@netcom.com>
In article <7vzpv1o41w.fsf@speedy.speakeasy.org>,
Brett McCormick <brett@speedy.speakeasy.org> wrote:
>
> You could use select. (man perlfunc)
How? The man pages would seem to suggest select is a file handle
utility, nothing more.
--
-- Scott Seligman will hack perl for good books
-- email: seligman@netcom.com
------------------------------
Date: 14 Apr 1997 19:44:03 GMT
From: akwong@ee.ualberta.ca (Mandr)
Subject: Re: Unix and ease of use (WAS: Who makes more ...)
Message-Id: <5iu1e3$17du@pulp.ucs.ualberta.ca>
Tim Behrendsen (tim@a-sis.com) wrote:
> John Johnson <johntj@bellsouth.net> wrote in article <334888E4.153B@bellsouth.net>...
> > David Masterson wrote:
> > >
> > > tomw@tsys.demon.co.uk (Tom Wheeley) writes:
> > >
> > > > Windows is a closed standard. Could anyone write a product to
> > > > compete with Windows? (well, there's WINE of course... imho the
> > > > most important project for free software on the intel platform)
> > >
> > > Yeah, but didn't Microsoft realize the potential hurt that WABI/WINE
> > > would cause to their bottom line and change the playing field again
> > > with Windows-95/Windows-CE/Windows-NT and thus limit or even eliminate
> > > WABI/WINE as a serious competitor?
> > >
> >
> > You can't be serious.
> Oh, but they are. Scary, isn't it?
This again proved that the direction of WINE/WABI is incorrect. trying
to emulate a closed-standard is risky, because a private company own the
standard and has the power to hide part of the standard or change it. I
doute that Microsoft fears WINE/WABI. What they fear, is Java. The
release of ActiveX/WFC and Bill Gates' talk about his vision of Java
imply this fear.
Windows-NT is introduced to control the server market. Once they
control that, they could use the same old trick they used in the
Word/Work Perfect war (hidden implementation) to rule out Netscape servers,
and then control the internet market.
Windows-CE is for combating JavaOS/NC allience. Buying WebTV is part of
the strategy.
If the WINE fans were into the WINE project because of fun, then they
sould stick to it. If they are in because they want to beat Microsoft,
they should start writing Pure Java applications instead. Corel by
itself cannot make a big difference.
Mandr
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
____ Albert Kwong - Computer Engineering - U of Alberta
Mountain-| \ email - akwong@ee.ualberta.ca
| )-Mandr phone - (Edmonton) 403-437-4167 (HK) 852-23622744
River-|____ / www - http://www.ee.ualberta.ca/~akwong
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
------------------------------
Date: Mon, 14 Apr 1997 09:29:14 -0400
From: Mike List <troll@net-link.net>
Subject: Re: Unix and ease of use (WAS: Who makes more ...)
Message-Id: <3352312A.662192AE@net-link.net>
John Chaffer wrote:
>
> Martin Sohnius x24031 wrote:
> >
> ...
> > And your definition of "successful" as applied to a social and political
> > order ignores anything else but material gains. Is it really the
> > purpose of society to make everyone work harder? Or rather to provide
> > a worthwhile and happy life?
> >
>
> Martin:
> That kind of puerile comment shows how ignorant socialists really,
> really are. The total, utter failure of socialism to provide
> anything but bankruptcy, chaos and finally, collapse has been
> illustrated over and over, not least by your own nation. Certainly
> you were aware (or were you) that the Soviet Union is no more?
>
> What planet do you live on?
>
> jrc
What reality do you inhabit? I'm sick of the lie retold until it's
finally true. Socialism did not collapse on its own. It requiresd the
ful weight of the non-socialist world's resources brought to bear to
cause it to collapse. It's very comforting to social conservatives to
think that that EVIL system has been proven to be ineffective. Socialist
countries have simply chosen to ignore the fact that sharing resources
ala Marx, if not done willingly will be worked around so I can have just
a bit more than you. By using purges and prisons, Stalin et al failed to
allow an ethos that allowed socialism to flourish in the face of
combined non socialist world pressure. the internal failure was due to
megalomania on the part of those socialist rulers who couldn't wait for
their worker's utopia so they would be remembered as "great men"."Alie ,
told often enough, is still a lie"- every sensible human in history
--
||\\ //|| || ||// ||= || || ||= =||=
|| the more I learn the more I learn there
|| || || ||\\ ||= ||= || =|| ||
is to learn (kinda like playing guitar)!!!!
------------------------------
Date: 15 Apr 1997 00:42:26 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Why is $Line=~ s///; erasing =
Message-Id: <5iuiti$bun$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, obsidian@shore.net (Kevin Swope) writes:
:why does:
:$Blank_var="";
:$Tag=~ s/$Blank_var//;
:occasionally erase the = from variable $Tag when it contains a =
:the line:
:$Tag=~ s///;
:does the same thing.
Because
if ( /something/ ) {
s//bar/;
}
changes "something". This is mentioned in perlop.
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
"Espousing the eponymous /cgi-bin/perl.exe?FMH.pl execution model is like
reading a suicide note -- three days too late."
--Tom Christiansen <tchrist@mox.perl.com>
------------------------------
Date: 15 Apr 1997 01:52:05 GMT
From: dblack@icarus.shu.edu (David Alan Black)
Subject: Re: Why is $Line=~ s///; erasing =
Message-Id: <5iun05$ha@pirate.shu.edu>
Hello -
Tom Christiansen <tchrist@mox.perl.com> writes:
> [courtesy cc of this posting sent to cited author via email]
>In comp.lang.perl.misc, obsidian@shore.net (Kevin Swope) writes:
>:why does:
>:$Blank_var="";
>:$Tag=~ s/$Blank_var//;
>:occasionally erase the = from variable $Tag when it contains a =
>:the line:
>:$Tag=~ s///;
>:does the same thing.
>Because
> if ( /something/ ) {
> s//bar/;
> }
>changes "something". This is mentioned in perlop.
Admitting that I couldn't find mention of this in perlop or
the Camel - testing it in any case gave me a segfault:
candle:~/hacking/perl$ perl -w
$_ = "abc";
if (/a/) { s//e/; }
^D
Segmentation fault
(Linux candle 2.0.26 #1 Mon Dec 2 22:28:36 EST 1996 i486
This is perl, version 5.003_95)
Also, I'm not sure how this construct would come into play in Kevin's
first example. Finally... given that s//bar/ outside of an if block
actually does something, what is the advantage of changing what it does
in the case you've illustrated (give or take the segfault)? In other
words, what if one wanted:
if ( /something/ ) {
# do what s//bar/ would normally do
}
Not that what s//bar/ would normally do is something one would want
often, but still.
Thanks for any untangling -
David Black
dblack@icarus.shu.edu
------------------------------
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 302
*************************************
