[24893] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 7145 Volume: 10

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Sep 16 03:06:49 2004

Date: Thu, 16 Sep 2004 00:05:13 -0700 (PDT)
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, 16 Sep 2004     Volume: 10 Number: 7145

Today's topics:
    Re: a splice question (justme)
    Re: a splice question <see@sig.invalid>
    Re: a splice question <uri@stemsystems.com>
    Re: Best place to learn perl? (justme)
    Re: Best place to learn perl? <andrew@bryson.co.nz>
    Re: Best place to learn perl? (Page)
    Re: external program <jurgenex@hotmail.com>
    Re: external program <simplitia@gmail.com>
        Extracting bitmap from Excel using Win32::OLE (aminnis)
    Re: killing a "nobody's" process and its group <lawshouse.public@btconnect.com>
        Newbie Question (tim)
    Re: Newbie Question <see@sig.invalid>
    Re: Newbie Question <wksmith@optonline.net>
    Re: preserving back references (ie $1, $2...) <eric-amick@comcast.net>
    Re: Regular expression to match month number 1,...,12 ( <nospam@nosite.zzz>
    Re: replace ever 80th character in a string with a quot <abigail@abigail.nl>
    Re: replace ever 80th character in a string with a quot <lv@aol.com>
    Re: require("filex.pl")  , where the file? <Joe.Smith@inwap.com>
    Re: Speicherkosnum <tore@aursand.no>
        Why this Regex not working? <adsense@whitehouse.com>
    Re: Xah Lee's Unixism <proto@panix.com>
    Re: Xah Lee's Unixism <proto@panix.com>
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

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

Date: 15 Sep 2004 18:34:14 -0700
From: eight02645999@yahoo.com (justme)
Subject: Re: a splice question
Message-Id: <c0837966.0409151734.739b01f7@posting.google.com>

"John W. Krahn" <someone@example.com> wrote in message news:<So%1d.35901$XP3.19782@edtnps84>...
> Michele Dondi wrote:
> > On Wed, 15 Sep 2004 05:21:10 GMT, Uri Guttman <uri@stemsystems.com>
> > wrote:
> > 
> >> >> but you could also use File::ReadBackwards:
> >>
> >> JWK> Or use a list slice (instead of copying the list to an array.)
> >>
> >> JWK> print +( <FILE> )[ -10 .. -1 ];
> >>
> >>that still reads in the entire file into a list of lines and then slices
> >>it. file::readbackwards never reads more than it needs (it actually does
> >>block i/o so it reads many lines at one time).
> > 
> > He did never claim it doesn't. His suggestion was reasonable in that
> > it achieves the same effect of the cited one eliminating the somewhat
> > unnecessary step of creating a reference to an anonymous array and
> > then dereferencing it.
> 
> As well as the overhead of calling the splice function.  :-)
> 
> 
> John


Hi all, thanks for the tips.
pardon my ignorance, i tried to find the purpose of the "+" in
+(<FILE>) in the perldoc and i read something like this:
 ...
 Also be careful
not to follow the print keyword with a left parenthesis unless you
want
the corresponding right parenthesis to terminate the arguments to the
print--interpose a C<+> or put parentheses around all the arguments.
 ...

Is this the explaination of putting a "+" in +(<FILE>) ??

thanks


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

Date: Wed, 15 Sep 2004 23:02:40 -0400
From: Bob Walton <see@sig.invalid>
To: justme <eight02645999@yahoo.com>
Subject: Re: a splice question
Message-Id: <41490250.40305@sig.invalid>

justme wrote:

> "John W. Krahn" <someone@example.com> wrote in message news:<So%1d.35901$XP3.19782@edtnps84>...
> 
>>Michele Dondi wrote:
>>
>>>On Wed, 15 Sep 2004 05:21:10 GMT, Uri Guttman <uri@stemsystems.com>
>>>wrote:
 ...
> pardon my ignorance, i tried to find the purpose of the "+" in
> +(<FILE>) in the perldoc and i read something like this:
> ...
>  Also be careful
> not to follow the print keyword with a left parenthesis unless you
> want
> the corresponding right parenthesis to terminate the arguments to the
> print--interpose a C<+> or put parentheses around all the arguments.
> ...
> 
> Is this the explaination of putting a "+" in +(<FILE>) ??


Yep.  Without the + , print (<FILE>)[-10..-1]; is a syntax error.


 ...


-- 
Bob Walton
Email: http://bwalton.com/cgi-bin/emailbob.pl



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

Date: Thu, 16 Sep 2004 03:07:55 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: a splice question
Message-Id: <x7isae29pq.fsf@mail.sysarch.com>

>>>>> "BW" == Bob Walton <see@sig.invalid> writes:

  BW> justme wrote:
  >> pardon my ignorance, i tried to find the purpose of the "+" in
  >> +(<FILE>) in the perldoc and i read something like this:
  >> ...
  >> Is this the explaination of putting a "+" in +(<FILE>) ??

  BW> Yep.  Without the + , print (<FILE>)[-10..-1]; is a syntax error.

but you can also wrap the entire arg list in () too:

	print( (<FILE>)[-10..-1] ) ;

the purpose of the + is to tell perl that the following () is an
expression and not the parens for an arg list.

uri

-- 
Uri Guttman  ------  uri@stemsystems.com  -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs  ----------------------------  http://jobs.perl.org


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

Date: 15 Sep 2004 19:18:12 -0700
From: eight02645999@yahoo.com (justme)
Subject: Re: Best place to learn perl?
Message-Id: <c0837966.0409151818.59e8f789@posting.google.com>

Ala Qumsieh <notvalid@email.com> wrote in message news:<nC12d.20052$AK3.7738@newssvr27.news.prodigy.com>...
> Page wrote:
> 
> > Is there an online school or should I try to take a night course at
> > one of the local colleges?
> 
> The best online school I can think of is comp.lang.perl.misc. I learnt 
> *A LOT* just from lurking on the ng. 99.99% of all questions you will 
> ever come up with have already been answered here dozens of times, and 
> will be answered again and again on a daily basis.
> 
> So, my advice to you is read as many posts as you can on clpmisc. And 
> just when you feel you lurked long enough, lurk around some more.
> 
> --Ala

yes i agree with you.:-) 
thanks to the ppl of clpm !...


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

Date: Thu, 16 Sep 2004 16:15:40 +1200
From: "Andrew Bryson" <andrew@bryson.co.nz>
Subject: Re: Best place to learn perl?
Message-Id: <5s82d.3730$mZ2.338882@news02.tsnz.net>

"justme" <eight02645999@yahoo.com> wrote in message 
news:c0837966.0409151818.59e8f789@posting.google.com...
> Ala Qumsieh <notvalid@email.com> wrote in message 
> news:<nC12d.20052$AK3.7738@newssvr27.news.prodigy.com>...
>> The best online school I can think of is comp.lang.perl.misc. I learnt
>> *A LOT* just from lurking on the ng. 99.99% of all questions you will
>> ever come up with have already been answered here dozens of times, and
>> will be answered again and again on a daily basis.
>>
>> So, my advice to you is read as many posts as you can on clpmisc. And
>> just when you feel you lurked long enough, lurk around some more.
>>
> yes i agree with you.:-)
> thanks to the ppl of clpm !...

Also don't be afraid to help others here if you think you know the answer - 
if you get it wrong someone is bound to correct you and you will learn from 
it :-).

Andrew 




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

Date: 15 Sep 2004 21:26:34 -0700
From: dummymb@hotmail.com (Page)
Subject: Re: Best place to learn perl?
Message-Id: <6742094.0409152026.2a4c8c22@posting.google.com>

"David K. Wall" <dwall@fastmail.fm> wrote in message news:<Xns956567A26487Adkwwashere@216.168.3.30>...
> Page <dummymb@hotmail.com> wrote:
> 
> You *can* assign that value to a variable. I'd bet the problem is 
> that you're assigning an array (@{$struct->{treemap}->[0]->
> {pscript}}) to a scalar ($PATH), and an array in scalar context just 
> gives you the number of elements in the array. Maybe you wanted the 
> contents of the array? 
> 
>     my @PATH = @{$struct->{treemap}->[0]->{pscript}};

You were right.  There were two problems, one was that I was using the 
XML::Simple and Data::Dumper modules, so Perl was not liking the fact that I 
wasn't using the "my" in front of my variables.  I also figured out that if 
I know that the array only has one value then I can do the following:

my $pscript = @{$struct->{treemap}->[0]->{pscript}}[0];

I appear to be on the right track.  The trouble I'm having now is when I try 
to use $pscript and [0] contains no value.  When that happens I get 
something like "HASH(0x1d82e20)" which I don't know what it means.

When I use Dumper, it shows a value of null.  To be precise it shows:
'pscript' => [ {} ],

How do I get it to return the null string ("") instead of this strange HASH value?


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

Date: Wed, 15 Sep 2004 23:26:06 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: external program
Message-Id: <ic42d.4498$g9.2679@trnddc06>

Alex Lee wrote:
> Dear all: I am having a problem that is driving me nuts and I hope
> some one can help me.
>
> Basically I need to access another program/script from my perl script.
> This is easy. It is not when the program ask for an input (ie yes or
> no).

You may want to check the Expect module

jue 




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

Date: 15 Sep 2004 21:27:50 -0700
From: "Alex  Lee" <simplitia@gmail.com>
Subject: Re: external program
Message-Id: <cib4o6$55g@odbk17.prod.google.com>

OK I finally found a solution to this and I thought I share it in case
someone runs into the same problem. To solve this I use a perl module
that can send keystroke(s) to the console where the external program
was evoked. That way its kind of like a user typing things out. Here is
the code:

--------------------------------------------------------------------------------------------------------------
use Win32::GuiTest qw/SendKeys FindWindowLike GetComboContents/;
open(PROG,"externalScript.pl|") or die "Cannot open pipe";

while(<PROG>){
print "$_";
## now I wait until the right prompt is asked: in this case the prompt
from the external program is simply "enter something" see external
program at ## the bottom.

SendKeys("ABC {ENTER}") if $_ =~ /enter/;
}

## end program
----------------------- start external script.

$|=1;
print "enter something \n";

my $i = <>;
print "your input: $i";

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



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

Date: 15 Sep 2004 15:40:05 -0700
From: alanminnis@yahoo.com (aminnis)
Subject: Extracting bitmap from Excel using Win32::OLE
Message-Id: <eaef7f31.0409151440.7bcfa5e@posting.google.com>

Hello all,

Does anyone know how to extract a bitmap from a cell using win32::OLE
and save it to a file?  Any help is appreciated.

Alan


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

Date: Thu, 16 Sep 2004 07:53:53 +0100
From: Henry Law <lawshouse.public@btconnect.com>
Subject: Re: killing a "nobody's" process and its group
Message-Id: <k19dk0tuu9a5mr2m6qv13tedmidarbpotg@4ax.com>

On 13 Sep 2004 17:03:16 GMT, "A. Sinan Unur"
<1usa@llenroc.ude.invalid> wrote:

>Federico <es@yahoo.fedeabascal> wrote in
>news:ci4f36$cgr$1@nsnmrro2-gest.nuria.telefonica-data.net: 
>
 ...
>> 'kill(-9, PID)' it is able to kill it.
>
>That is gibberish.
>
>Your problem (whatever it is) is not a Perl problem. 
 ...
>you should be asking the question (in a more intelligible manner) in the 
>appropriate forum.

The reasoning behind your post is, of course, correct.  But the
unkindness in what you have written is breathtaking.  

The OP plainly has something other than English as his first language
and is doing his best.  Does your position as an English-speaking
über-mensch living in the land of the free give you the right to put
him down like that?

How hard would it have been to write

	"This is not a Perl problem.  Killing processes is done
	by the operating system so you should ask in the newsgroup
	for the operating system in which Apache is running"


Henry Law       <><     Manchester, England 


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

Date: 15 Sep 2004 19:36:28 -0700
From: audi_nfl@yahoo.com (tim)
Subject: Newbie Question
Message-Id: <43eba941.0409151836.3c8fdf51@posting.google.com>

Help please..

I have to parse through a file for a pattern and if the pattern
matches, the preceding two and succeeding lines until a blank line is
encountered need to be redirected to another file. This has to be done
multiple times until EOF.

I have figured out the pattern matching and file redirection part. Can
anyone give hints regarding how to capture the preceedng two lines
after the pattern matches.

Thanks for your help.

tim


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

Date: Wed, 15 Sep 2004 23:08:46 -0400
From: Bob Walton <see@sig.invalid>
Subject: Re: Newbie Question
Message-Id: <414903BE.80507@sig.invalid>

tim wrote:

 ...


> I have to parse through a file for a pattern and if the pattern
> matches, the preceding two and succeeding lines until a blank line is
> encountered need to be redirected to another file. This has to be done
> multiple times until EOF.
> 
> I have figured out the pattern matching and file redirection part. Can
> anyone give hints regarding how to capture the preceedng two lines
> after the pattern matches.


What have you tried?  Have you tried simply assigning two variables, one 
to hold the line previous to the line just read and the other to hold 
the line before that?  Then you can just output those two lines before 
outputing the current line and subsequent lines until a blank line is 
found.  Try devising something along those lines and if you get stuck, 
post back with your code.

 ...


> tim

-- 
Bob Walton
Email: http://bwalton.com/cgi-bin/emailbob.pl



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

Date: Thu, 16 Sep 2004 03:42:00 GMT
From: "Bill Smith" <wksmith@optonline.net>
Subject: Re: Newbie Question
Message-Id: <cY72d.93$Of4.310434@news4.srv.hcvlny.cv.net>


"tim" <audi_nfl@yahoo.com> wrote in message
news:43eba941.0409151836.3c8fdf51@posting.google.com...
> Help please..
>
> I have to parse through a file for a pattern and if the pattern
> matches, the preceding two and succeeding lines until a blank line is
> encountered need to be redirected to another file. This has to be done
> multiple times until EOF.
>
> I have figured out the pattern matching and file redirection part. Can
> anyone give hints regarding how to capture the preceedng two lines
> after the pattern matches.
>
> Thanks for your help.


How big is your input file?  The problem is nearly trivial if it small
enough to read the entire file into an array.  Otherwise, you may have
to trade off between complexity and execution time.

What should your program do if one of the first two or last two records
match?  Can we ignore that possibility?  Could it ever be necessary to
output the same record more than once (e.g. Two or more consecutive
lines match)?

What have you tried?  Where did you have a problem?

Bill




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

Date: Wed, 15 Sep 2004 22:24:52 -0400
From: Eric Amick <eric-amick@comcast.net>
Subject: Re: preserving back references (ie $1, $2...)
Message-Id: <q4uhk054pkv58ptjbgq4ul4shn205nhaia@4ax.com>

On Wed, 15 Sep 2004 00:34:57 GMT, "John W. Krahn" <someone@example.com>
wrote:

>rob wrote:
>> Does anyone know of a way to preserve that back reference so you can
>> continue to access parts of a sting with out having to parse them out
>> into separate scalar variables?
>
>You mean something like this.  :-)
>
>my $string = 'a,b;c,d;e,f';
>if ( $string =~ /([a-z,]+);([a-z,]+);([a-z,]+)/ ) {
>   print "START_3\n";
>   print "$1\n";
>   { local $_ = $1;
>     local ( $1, $2, $3 );

The capture variables are already block scoped, so the second local()
really isn't necessary.

-- 
Eric Amick
Columbia, MD


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

Date: Wed, 15 Sep 2004 22:34:21 -0700
From: Paul Lutus <nospam@nosite.zzz>
Subject: Re: Regular expression to match month number 1,...,12 (including e.g. 04,05)
Message-Id: <10ki9f0elomhd7c@corp.supernews.com>

187 wrote:

> Paul Lutus wrote:
>> Matt Benson wrote:
>>
>> First, DO NOT CROSS-POST as you are doing. Choose at most two
>> newsgroups.
> 
> Oh come off it, he posted to groups that can be considered relevant to
> this topic.

Read any beginner's guide to Usenet, then come back and retract.

http://www.cs.tut.fi/~jkorpela/usenet/xpost.html

Quote:

"It is considered highly inappropriate to broadcast your message to a wide
selection of newsgroups merely to have more people read it. Note also that
many people automatically ignore articles posted to more than two or three
groups."

http://www.usenet.com/articles/cross_posting.htm

Quote:

"You should cross-post only when it is really needed, and usually not to
more than three groups."

And so forth, through hundreds of such authoritative guides.

> RegEx, in the general sense, can be difficult to fully fit 
> into just one category. It's a part of sed, egrep, Perl, among many
> other languages and tools. I'm sorry, but this is such a case when the
> crossposting seems merited.

No, first because such a wide cross-post is always unacceptable, and because
the OP must have some preliminary target environment in mind. That
environment has some specific traits.

> 
> And come to think of it, that's the whole point of cross posting, to be
> able to reach as many people for a given relevant topic without posting
> multiple copies for each group (multi-posting), is it not?

Cross-posting to more than a few groups is unacceptable. See above.

> 
>>> How does a regular expression look like which should match exactly
>>> one of the twelve possible month numbers
>>> 1,...,12
>>> Prepending a zero to one-digit month numbers should be allowed e.g.
>>> 07
>>
>> Simple, but you need to say which language/utility/command you plan to
>> process the expression. The below won't find the single-digit
>> versions, but it will work for the double-digit forms:
>>
>> (01|02|03|04|05|06|07|08|09|10|11|12)
> 
> Why not   (1[0-2]|0?[1-9])   ? Takes care of leading 0's too :-) Should
> work with most tools, like Perl, sed, egrep, and the likes.

Yes, my example is pretty bad, but since the OP did not say which engine he
is going to use, I didn't try to tune it for a specific environment. There
really are a lot of types of regex, of widely varying vintages. He needed
to say which regex engine he is planning to use, instead of crossposting.

-- 
Paul Lutus
http://www.arachnoid.com



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

Date: 15 Sep 2004 23:23:26 GMT
From: Abigail <abigail@abigail.nl>
Subject: Re: replace ever 80th character in a string with a quote
Message-Id: <slrnckhjnd.qm8.abigail@alexandra.abigail.nl>

Scott W Gifford (gifford@umich.edu) wrote on MMMMXXXIII September
MCMXCIII in <URL:news:qszhdpznsql.fsf@asteroids.gpcc.itd.umich.edu>:
''  jason@cyberpine.com writes:
''  
'' > running under HPUX.
'' >
'' > Perl Newbie here.
'' >
'' > I have a file with one record that can be very wide, possibly 5000+
'' > bytes wide.
'' >
'' > I need to replace every 80th byte in that record with a double quote.
''  
''  Something like this is one way to do the substitution without a regexp:
''  
''      use constant WIDTH => 80;
''      my $s = "0123456789" x 100;
''  
''      foreach my $i (1..length($s)/WIDTH)
''      {
''        substr($s,$i*WIDTH-1,1)=q{'};
''      }

Or just:

        use constant WIDTH => 80;
        for (my ($l, $i) = (length ($s), WIDTH - 1); $i < $l; $i += WIDTH) {
            substr $s, $i, 1, '"'
        }


avoiding first dividing by WIDTH, then multiplying with it again.



Abigail
-- 
srand 123456;$-=rand$_--=>@[[$-,$_]=@[[$_,$-]for(reverse+1..(@[=split
//=>"IGrACVGQ\x02GJCWVhP\x02PL\x02jNMP"));print+(map{$_^q^"^}@[),"\n"


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

Date: Wed, 15 Sep 2004 21:03:33 -0500
From: l v <lv@aol.com>
Subject: Re: replace ever 80th character in a string with a quote
Message-Id: <4148f471_4@corp.newsgroups.com>

jason@cyberpine.com wrote:
> running under HPUX.
> 
> Perl Newbie here.
> 
> I have a file with one record that can be very wide, possibly 5000+
> bytes wide.
> 
> I need to replace every 80th byte in that record with a double quote.
> I have the below script, with a failed attempt to replace x number of
> spaces with the quote, but that solution will not work upon further
> inspection of the data.
> 
> #!/usr/bin/perl
> strict;
> use warnings;
> open RIN,"<x1" or die "ERROR!";
> open ROUT,">x2" or die "ERROR!";
> while (<RIN>) {
>  $_=~s/                                     / "/g;
>  print ROUT ($_);
> }
> print ROUT ("\"");
> close (RIN);
> close (ROUT);
> 
> Many thanks for any help or information.

try perldoc -f substr

Len


-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com - The #1 Newsgroup Service in the World!
-----==  Over 100,000 Newsgroups - 19 Different Servers! =-----


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

Date: Thu, 16 Sep 2004 07:03:55 GMT
From: Joe Smith <Joe.Smith@inwap.com>
Subject: Re: require("filex.pl")  , where the file?
Message-Id: <rVa2d.201718$Fg5.54535@attbi_s53>

Mimi wrote:

> I'm new to Pearl.  I read some asp file and see the line '
> require("filex.pl")', I thought that filex should be in the same
> directory, but it wasn't.  How can I know where the file located

Whenever you use() or require() a file or module, the result gets
stored in the %INC hash.

% perl -le 'require "pwd.pl";for(keys %INC){print "$_=$INC{$_}\n"}' 

pwd.pl=/usr/lib/perl5/5.8.3/pwd.pl

	-Joe


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

Date: Thu, 16 Sep 2004 06:37:08 +0200
From: Tore Aursand <tore@aursand.no>
Subject: Re: Speicherkosnum
Message-Id: <pan.2004.09.16.04.37.07.308835@aursand.no>

On Wed, 15 Sep 2004 10:13:50 +0200, Peter wrote:
> folgendes Script kosnumiert Speicher en mass und ich habe keine Ahnung
> warum.

English, please.


-- 
Tore Aursand <tore@aursand.no>


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

Date: Thu, 16 Sep 2004 06:38:40 GMT
From: "Looking" <adsense@whitehouse.com>
Subject: Why this Regex not working?
Message-Id: <Qxa2d.2507$RTE1.503@news01.bloor.is.net.cable.rogers.com>

$s='sadf content= "this is what i want " asd " sdf " adfa  " sdf';
$s =~ s/.*content=.*?["|'](.*)?["|'].*/$1/si;
#$s =~ s/.*content=.*?["|']([^"|']*)["|'].*/$1/si;
print "$s\n";

The scond regex works. I wonder why the first regex not working?
I am trying to get whatever is between the first pair of "" or '' after
content=. It is parsing the header file of HTML pages.

The first regex gave me this:
 "this is what i want " asd " sdf " adfa

But I need this:
this is what i want




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

Date: Thu, 16 Sep 2004 00:56:58 -0400
From: Walter Bushell <proto@panix.com>
Subject: Re: Xah Lee's Unixism
Message-Id: <proto-D544A9.00565816092004@reader1.panix.com>

In article <%T%Yc.29567$Es2.11957889@news4.srv.hcvlny.cv.net>,
 "John W. Kennedy" <jwkenne@attglobal.net> wrote:

> Andre Majorel wrote:
> > On 2004-08-31, Brian Inglis <Brian.Inglis@SystematicSW.Invalid> wrote:
> > 
> >>On Tue, 31 Aug 2004 01:12:55 +0000 (UTC) in alt.folklore.computers,
> >>Andre Majorel <amajorel@teezer.fr> wrote:
> >>
> >>
> >>>On 2004-08-30, Antony Sequeira <usemyfullname@hotmail.com> wrote:
> >>
> >>>>Windows (MS) is not 'Unixism'?
> >>>
> >>>If by unixism, you mean any operating system that has a
> >>>hierarchical filesystem and byte stream files, yes. But that
> >>>would include quite a few other non-Unix operating systems,
> >>>including Mac OS 9, Prologue and probably everything else this
> >>>side of CP/M (DOS 1.x shall be deemed to be CP/M).
> >>
> >>DOS 2.x+ shall be deemed to be CP/M+! 
> > 
> > 
> > Wasn't it in version 2 that they added directories and
> > Unix-style file handles ?
> 
> Yes, and also a single-process pipe emulator.  Ever since 2.0, MS has 
> been trying to turn MS-DOS (later, Windows) into a Unix clone.

And they got beat to Unixhood  (or UnixDoom) by Apple.

-- 
Guns don't kill people; automobiles kill people.


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

Date: Thu, 16 Sep 2004 01:00:13 -0400
From: Walter Bushell <proto@panix.com>
Subject: Re: Xah Lee's Unixism
Message-Id: <proto-6F51A7.01001316092004@reader1.panix.com>

In article <877jrcjy1n.fsf@thalassa.informatimago.com>,
 Pascal Bourguignon <spam@mouse-potato.com> wrote:

> "John Thingstad" <john.thingstad@chello.no> writes:
> > Note the Mac OS 10 / Darwin uses a unix kernel because of all the
> > problems  with
> > interoperabillity OS 9 had with talking to Windows and Unix boxes.
> 
> No that's not the reason. The reason is ONLY because of the lack of
> virtual memory management (with separation of addressing spaces for
> processes) in MacOS.  That's the one error in design in MacOS I
> identified in version 1.0 that they've dragged all along for 20
> years. (And I bet that if they did not make it, AAPL would be $50-$80
> now, and they'd have at least 40%-50% of market share).  Instead,
> they've wasted resources, CEOs and CTOs for 10 years before the NeXT
> take over.

NeXT took over Apple. Yes, that is the way it was except for the fiscal 
realities.

-- 
Guns don't kill people; automobiles kill people.


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

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


Administrivia:

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

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

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

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

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


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


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