[16495] in Perl-Users-Digest
Perl-Users Digest, Issue: 3907 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Aug 3 21:05:38 2000
Date: Thu, 3 Aug 2000 18:05:14 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <965351114-v9-i3907@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Thu, 3 Aug 2000 Volume: 9 Number: 3907
Today's topics:
Activeperl install fails Internal Error 2744 (Danny Aldham)
Re: Algorithm for efficient creation of unique, random (Abigail)
any ideas? hamed53@my-deja.com
Re: any ideas? (Clinton A. Pierce)
Re: Any perl web experts out there - please help (David Krainess)
Re: Any perl web experts out there - please help (Pjtg0707)
Re: CGI.pm cookie failure (Marcel Grunauer)
Re: CGI.pm cookie failure <godzilla@stomp.stomp.tokyo>
Re: CGI.pm cookie failure <bkennedy99@home.com>
Re: combining hashes <uri@sysarch.com>
Re: combining hashes <uri@sysarch.com>
cookie anyone? <troyr@vicnet.net.au>
Directory mover (BUCK NAKED1)
display content from <STDIN> jliu34740@my-deja.com
Re: display content from <STDIN> <tony_curtis32@yahoo.com>
Re: How do I parse "file0001" into 2 parts? (P&C)
Re: How do I parse "file0001" into 2 parts? <rickysregistration@hotmail.com>
Re: How do I parse "file0001" into 2 parts? <tbc@spamcop.net>
Re: How do I run CGIs on my desktop? (Pjtg0707)
Re: How to open and append to a file <c-stone@att.net>
Re: I need a Perl developer sotoo@my-deja.com
Interaction with OS sotoo@excite.com
Re: Interpolating strings--special characters, _not_ va <iltzu@sci.invalid>
launch a browser and get a URL <star@sonic.net>
Re: launch a browser and get a URL (Marcel Grunauer)
Re: launch a browser and get a URL <tony_curtis32@yahoo.com>
Re: launch a browser and get a URL <star@sonic.net>
Re: launch a browser and get a URL <star@sonic.net>
Need help with COM object <jlinch@mediaone.net>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 3 Aug 2000 22:46:31 GMT
From: danny@hendrix.postino.com (Danny Aldham)
Subject: Activeperl install fails Internal Error 2744
Message-Id: <8mcso7$ge9$1@hendrix.postino.com>
X-Newsreader: TIN [version 1.2 PL2]
I tried to install ActivePerl 616 and 613 onto two different NT4 SP5 boxes
today, both failed with the error message:
Internal error ,PL_IISMAP, D:\Perl\bin ,D:\Perl\bin\wperl.exe -ID:\perl\lib\\
_ID:\perl\site\lib\\ D:\Perl\bin\IISScriptmap.pl 0 .pl D:\perl\bin\perl.exe
%s %s 4 PUT,Delete
Any hints or tips appreciated.
--
Danny Aldham Providing Certified Internetworking Solutions to Business
www.postino.com E-Mail, Web Servers, Mail Lists, Web Databases, SQL & Perl
------------------------------
Date: 03 Aug 2000 23:02:50 GMT
From: abigail@foad.org (Abigail)
Subject: Re: Algorithm for efficient creation of unique, random array
Message-Id: <slrn8ojugb.jno.abigail@alexandra.foad.org>
Logan Shaw (logan@cs.utexas.edu) wrote on MMDXXIX September MCMXCIII in
<URL:news:8mcnnr$ifq$1@provolone.cs.utexas.edu>:
""
"" The great thing about the tree method would be that it's O(log N) to
"" pick a node and also only O(log N) to update a node. The bad thing is
"" that's irritating to work with binary trees because it's a pain to
"" delete a node.
Then don't delete it. Just give it chance 0 to be selected.
Abigail
--
perl -we 'eval {die ["Just another Perl Hacker\n"]}; print ${${@}}[$#{@{${@}}}]'
------------------------------
Date: Thu, 03 Aug 2000 22:45:22 GMT
From: hamed53@my-deja.com
Subject: any ideas?
Message-Id: <8mcsm1$ia3$1@nnrp1.deja.com>
Hi,
I am very interested at how deja.com displays the threads (and the
replies to those threads) using that three structured view...
does anyone know any perl script that does the same thing with
displaying threads and replies? (exactly like the tree views in
deja.com?)
or... do you have any ideas how to do that?
(i have tried to write it myself, i got it to display threads almost
like deja, but not queit,... its hard to explain since you have to see
what i have done... but anyways it would be great/helpfull if any one
of you could direct me to a ready written program,... so i can buy that
(or get it free ;-) ) and study it...
thank you all
hamed
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 03 Aug 2000 23:23:48 GMT
From: clintp@geeksalad.org (Clinton A. Pierce)
Subject: Re: any ideas?
Message-Id: <8ani5.57574$fR2.576371@news1.rdc1.mi.home.com>
[Posted and mailed]
In article <8mcsm1$ia3$1@nnrp1.deja.com>,
hamed53@my-deja.com writes:
> I am very interested at how deja.com displays the threads (and the
> replies to those threads) using that three structured view...
>
> does anyone know any perl script that does the same thing with
> displaying threads and replies? (exactly like the tree views in
> deja.com?)
Not EXACTLY like that...but the FooBBS code I hacked up has a class
for maintaining message threads and some display logic for actually
putting the threads in HTML properly stacked.
Everything else is just icing.
--
Clinton A. Pierce Teach Yourself Perl in 24 Hours!
clintp@geeksalad.org for details see http://www.geeksalad.org
"If you rush a Miracle Man,
you get rotten Miracles." --Miracle Max, The Princess Bride
------------------------------
Date: Thu, 03 Aug 2000 23:41:46 GMT
From: davidkrainess@yahoo.com (David Krainess)
Subject: Re: Any perl web experts out there - please help
Message-Id: <8F85A92DFdavidkrainessyahooco@38.9.69.2>
abigail@foad.org (Abigail) wrote in
<slrn8ojou2.io6.abigail@alexandra.foad.org>:
> You would solve this problem in the same way as you would
>solve it using Ada or Eiffel.
Actually, I solved it using the approach one would take with a hybrid
project integrating an air traffic control program written in B for a PDP-
11 wired inline to a Cray super computer using a customized emulation of
Microsoft J++ 'ActiveX to CORBA' technology. Don't you think this is a
much easier approach to use to solve the problem?
------------------------------
Date: Thu, 03 Aug 2000 23:47:56 GMT
From: Pjtg0707@Netscape.net (Pjtg0707)
Subject: Re: Any perl web experts out there - please help
Message-Id: <sok15cc1dbm85@corp.supernews.com>
On Thu, 03 Aug 2000 23:41:46 GMT, David Krainess <davidkrainess@yahoo.com>
wrote:
>abigail@foad.org (Abigail) wrote in
><slrn8ojou2.io6.abigail@alexandra.foad.org>:
>
>> You would solve this problem in the same way as you would
>>solve it using Ada or Eiffel.
>
>Actually, I solved it using the approach one would take with a hybrid
>project integrating an air traffic control program written in B for a PDP-
>11 wired inline to a Cray super computer using a customized emulation of
>Microsoft J++ 'ActiveX to CORBA' technology. Don't you think this is a
>much easier approach to use to solve the problem?
Huh? This is a joke, right?
I feel so un---worthy!
------------------------------
Date: Thu, 03 Aug 2000 22:33:58 GMT
From: marcel@codewerk.com (Marcel Grunauer)
Subject: Re: CGI.pm cookie failure
Message-Id: <slrn8ojt4q.c0v.marcel@gandalf.local>
On Thu, 03 Aug 2000 14:02:50 -0700, Ron Hill <hillr@ugsolutions.com> wrote:
>I am rather new to perl/programming and now I am confused.
>I was under the impression to always use the -w switch and use strict,
>when developing a perl script. Now it seems that this is not the case.
>Can you provide an example of when not to use the -w or use strict? Or
>better yet, when to use and when not to use.
Feel free not to use it if you know what you're doing.
If you don't know when you wouldn't want to use it, you should use it.
I use it always when developing a program, unless it's a throwaway program.
warnings and strict are very useful in detecting bugs or dangerous
situations during development.
Once everything's been tested and gone into production, I tend not to
use warnings.
--
Marcel
sub AUTOLOAD{($_=$AUTOLOAD)=~s;^.*::;;;y;_; ;;print} Just_Another_Perl_Hacker();
------------------------------
Date: Thu, 03 Aug 2000 16:40:02 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: CGI.pm cookie failure
Message-Id: <398A02D2.E8BEF7C2@stomp.stomp.tokyo>
Ron Hill wrote:
> I am rather new to perl/programming and now I am confused.
Right. I have tiny blue monkeys flying out of my big butt.
> I was under the impression to always use the -w switch and use strict,
That's too bad. You should research pragma hints for
yourself. Truth discovered on your own, is the best
of all truths. Why have you not done your homework?
Are you interested in learning or do you prefer to
be spoon fed?
> when developing a perl script. Now it seems that this is not the case.
Why is it "...not the case."? I don't recall anyone suggesting
you never use pragma hints. Where did you come up with this
thought? Vivid imagination or malice intent?
My suggestion is not only to learn how to use pragma hints
correctly but also for experienced programmers to suggest
how to use pragma hints correctly rather than,
"YOU _MUST_ ALWAYS USE PRAGMA HINTS! IF YOU
DON'T, YOU ARE A BAD PROGRAMMER!"
Right bozo... your mind is on vacation.
> Can you provide an example of when not to use the -w or use strict? Or
> better yet, when to use and when not to use.
Would you like my response printed, bound and shipped to you?
I'll give you some very short sweet examples.
Pragma hints slow down your script speed and
bloat your memory usage.
Warnings, these are only needed, if at all, during
beta phase testing. What good does -w serve when
you have your final script version? Warnings serve
no purpose in a final script other than to slow
down your script and bloat memory usage. Nonetheless
Perl Gods proclaim, "You MUST always use warnings."
Heh! Bozos.
What use does an experienced programmer have for
warnings? When you reach a level of expertise where
you no longer recieve warnings, why you would you
continue to use warnings? Isn't this analogous to
a bicyclist entering Tour de France with training
wheels mounted on his bike?
If a new beginner relies strictly on warnings, his
or her ability to experiment, to be imaginative,
to learn programming finesse is reduced to zero
by warnings. Strict use of warnings at all times
produces lousy programmers.
There comes a time, if you want to become a really
good programmer, want to learn how to truly program,
you will dump pragma hints and venture where no
Perl 5 Cargo Cultist Copy & Paste Geek will go.
As to strict, research "reference, de-reference"
along with handlers, packages, scoping and an
large assortment of system crashes with ASP due
to lack of cross-platform compatiability. Then
give these a try:
@EXPORT, @EXPORT_OK, @ISA, %OVERLOAD
Same principle with warnings applies to strict.
Addiction to pragma hints produces lousy, very
lousy programmers who are too fearful to lose
their training wheels and win a bicycle race.
I would be more tempted to invest more effort
into this article of mine, except your charade
annoys me greatly. I've never taken much of a
hankering to people who hide in shadows and
whisper malice intent whatevers.
Why don't you be who you truly are, like me,
rather than hide?
In the meantime, why don't you research
pragma hints on your own. As I say,
"Best truth is your own discovery."
- Kira
Godzilla!
------------------------------
Date: Fri, 04 Aug 2000 00:39:52 GMT
From: "Ben Kennedy" <bkennedy99@home.com>
Subject: Re: CGI.pm cookie failure
Message-Id: <shoi5.79267$A%3.1105428@news1.rdc2.pa.home.com>
"Ron Hill" <hillr@ugsolutions.com> wrote in message
news:3989DDFA.63FB7C59@ugsolutions.com...
> Hello Godzilla,
> I am rather new to perl/programming and now I am confused.
> I was under the impression to always use the -w switch and use strict,
> when developing a perl script. Now it seems that this is not the case.
> Can you provide an example of when not to use the -w or use strict? Or
> better yet, when to use and when not to use.
Adding 'use strict' does three things - most importantly, it requires you to
explicly declare all variables with "my", "our", or "use vars". You can
only use global variables if they are fully qualifed with a package name,
like $main::bleh. For large complicated scripts, this can be a large time
saver. for example:
my $variable = "bleh";
.. 500 lines of code
print "Var is $varaible\n"; # note the name of the variable is spelled wrong
since the variable $varaible is not declared with my and does not contain a
package name, the perl interpreter immediately flags this as an error. This
is a good thing. Another side effect of declaring variables with my() is
that your script will run faster, since lexical variables declared with my()
are faster than global ones.
The other uses of strict are to restrict the use of barewords and symbolic
references. A good Perl book can go into more detail. Using the -w switch
enables warnings about lots of things, notably the use of variables before
they are initialized, the presence of variables that appear only once, etc.
An example of a warning:
$var = "bleh";
if ($var == 7) { }
will produce a warning, since you used a numeric comparison operator on a
string. And of course the extremely easy to do and annoying:
if ($var = 3) { }
Potentially very hard to debug without warnings. Again, a good way to catch
potential typos and other silly errors.
When do you not use strict or warnings? For production code, its a good
idea since they can only help. The benefits of using them increases as the
size of the script increases. For quickie throwaway scripts, I tend not to
use them. In general, using strict and warnings makes for more readable
code, and makes life easier in the long run. Hope this helps -
--Ben Kennedy
------------------------------
Date: Thu, 03 Aug 2000 22:21:13 GMT
From: Uri Guttman <uri@sysarch.com>
Subject: Re: combining hashes
Message-Id: <x78zue2dgn.fsf@home.sysarch.com>
>>>>> "A" == Abigail <abigail@foad.org> writes:
A> Uri Guttman (uri@sysarch.com) wrote on MMDXXIX September MCMXCIII in
A> <URL:news:x7bsza2iu7.fsf@home.sysarch.com>:
A> \\ >> and for an ugly exercise in slicing:
A> \\ >>
A> \\ >> @hash{ grep !exists $hash{$_}, keys %add } =
A> \\ >> @add{ grep !exists $hash{$_}, keys %add } ;
A> But for large hashes, you don't want to repeat the grep, or even
A> use keys.
for large %add hashes i agree.
A> while (my ($k => $v) = each %add) {exists $hash {$k} or
A> $hash{$k} = $v}
a nice version. i wonder what the speed diff are given different sizes
of %hash and %add. my slice stays internal longer but has duplicate
code. i am not in the mood to bench it.
uri
--
Uri Guttman --------- uri@sysarch.com ---------- http://www.sysarch.com
SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
The Perl Books Page ----------- http://www.sysarch.com/cgi-bin/perl_books
The Best Search Engine on the Net ---------- http://www.northernlight.com
------------------------------
Date: Thu, 03 Aug 2000 22:22:57 GMT
From: Uri Guttman <uri@sysarch.com>
Subject: Re: combining hashes
Message-Id: <x766pi2ddq.fsf@home.sysarch.com>
>>>>> "T" == Tim <SPAM> writes:
T> [ a million other correct responses deleted ]
T> Damn...last time I answer a gimme with a slow news
T> server...:)
but at least you were correct with both of your answers. how many
threads are full of wrong answers by quick fingered newbies and moronic
japanese monsters.
<pats tim on head>
uri
--
Uri Guttman --------- uri@sysarch.com ---------- http://www.sysarch.com
SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
The Perl Books Page ----------- http://www.sysarch.com/cgi-bin/perl_books
The Best Search Engine on the Net ---------- http://www.northernlight.com
------------------------------
Date: Fri, 4 Aug 2000 09:29:13 +1000
From: "Troy Rasiah" <troyr@vicnet.net.au>
Subject: cookie anyone?
Message-Id: <Tgni5.68862$N4.1895577@ozemail.com.au>
hi all,
I've been wondering if this is a problem with Internet Explorer or
me..but I'm using the following code to set a cookie that expires within 1
second. It works fine with Netscape but IE doesn't seem to respond to it.
For example...say i set the cookie for 10 mins at the start of the
program..they hit on a logout button..and it sets the expire time to 1s.
Anyone have any suggestions or comments......
my $cookie_expire='+1s' ;
$cookie = $query->cookie(-name=>'HOTTOP',
-value=>$session{_session_id},
-expires=>$cookie_expire,
-path=>'/',
-domain=>$cookie_domain);
print $query->header(-cookie=>$cookie);
print $query->start_html('Admin Logout');
--
----------------------------------------------------------------------------
----------------
Troy Rasiah
Database/Web Developer
Vicnet
troyr@vicnet.net.au
----------------------------------------------------------------------------
----------------
------------------------------
Date: Thu, 3 Aug 2000 17:46:17 -0500 (CDT)
From: dennis100@webtv.net (BUCK NAKED1)
Subject: Directory mover
Message-Id: <135-3989F639-95@storefull-242.iap.bryant.webtv.net>
I'm looking for a perl script that will move entire directories from one
server to another. I don't have enough perl experience to write one
myself. Is there one out there already that I can use?
If not, I'll try to do it myself. I've downloaded and studied "mirror"
from cpan, and it looks like it just copies the entire site. I'm looking
more for a perl script that will move selected directories and their
contents.
Can someone please direct me where to look? I'd prefer one that doesn't
need an added module or at least uses one of the more common modules,
such as CGI.pm.
Out of the research that I've done, it appears that I'll need the module
Net::FTP. Is this the best way to do the job?
Thanks in advance,
Dennis
------------------------------
Date: Thu, 03 Aug 2000 23:51:40 GMT
From: jliu34740@my-deja.com
Subject: display content from <STDIN>
Message-Id: <8md0ib$l8q$1@nnrp1.deja.com>
Here is part of my program:
print "\nEnter a string of characters for analysis or quit to exit: ";
@string=chomp($_=<STDIN>);
---------
if I enter a string "123 the" on one line, how do I count the number of
letters the user enters?
TIA
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 03 Aug 2000 19:04:59 -0500
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: display content from <STDIN>
Message-Id: <87punpvql0.fsf@limey.hpcc.uh.edu>
>> On Thu, 03 Aug 2000 23:51:40 GMT,
>> jliu34740@my-deja.com said:
> Here is part of my program: print "\nEnter a string of
> characters for analysis or quit to exit: ";
> @string=chomp($_=<STDIN>);
> --------- if I enter a string "123 the" on one line, how
> do I count the number of letters the user enters?
You want to find the length of the string.
hth
t
--
"With $10,000, we'd be millionaires!"
Homer Simpson
------------------------------
Date: Thu, 03 Aug 2000 22:06:19 GMT
From: mailloop@localhost.com (P&C)
Subject: Re: How do I parse "file0001" into 2 parts?
Message-Id: <3989ecb0.417251335@news.comstar.net>
Geesh!!! What an idiot I can be!!! Talk about making something harder
than it has to be!!!
substr() worked like a champ while I was trying to use m// method.
Thanks anyways!
Phil
p c a t n t a d m i n d o t c o m
------------------------------
Date: Thu, 03 Aug 2000 22:44:45 GMT
From: "Earthlink News" <rickysregistration@hotmail.com>
Subject: Re: How do I parse "file0001" into 2 parts?
Message-Id: <xBmi5.8564$Z6.304667@newsread1.prod.itd.earthlink.net>
P&C <mailloop@localhost.com> wrote in message
news:3989ecb0.417251335@news.comstar.net...
> substr() worked like a champ while I was trying to use m// method.
>
Hi,
m// would also work. If you have $_ == 'file001', you can do:
m%file(\d+)%;
$num = $1;
Or, more generally, when you have files of the format wordNUMBER:
m%([^\d]+)(\d+)%;
$word = $1;
$num = $2;
Always nice to have alternatives :)
Rick.
------------------------------
Date: Thu, 03 Aug 2000 22:36:33 GMT
From: Tim Chambers <tbc@spamcop.net>
Subject: Re: How do I parse "file0001" into 2 parts?
Message-Id: <8mcs5h$hre$1@nnrp1.deja.com>
Here's an example:
$ perl -e '($a="file0001")=~s/\D*(\d+)$/$1/;print "$a\n"'
0001
$
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 03 Aug 2000 22:38:06 GMT
From: Pjtg0707@Netscape.net (Pjtg0707)
Subject: Re: How do I run CGIs on my desktop?
Message-Id: <sojt2eb3dbm124@corp.supernews.com>
On Thu, 03 Aug 2000 17:26:00 -0400, zentara <zentara@gypsyfarm.com> wrote:
>On Thu, 3 Aug 2000 00:00:24 +0100, "jbr" <jbr@ntlworld.com> wrote:
>
>
>You need to setup a http server to run on your "localhost", ie your
>desktop computer.
I am not to well versed in WIndows, but if it's just syntax, then you can just
use one of the Perl ports like Active. But you are right, the best way to see
if a cgi actually works as designed is to have it run from a server. It might
be worth your while to find a local Linux UG and ask for some help setting
up something like that if you aren't into networking hardwares.
I have two apache servers running on my home lan , on two free 386 computers
I got for free and and they are quite handy
in checking the overall functionalities of the site before uploading
everything. But again, Linux and networking are my hobbies; I would not think
twice about rebulding Linux kernel, apache, or mySQL. YMMV
Pardon for the off topic post.
.
------------------------------
Date: Fri, 04 Aug 2000 00:11:31 GMT
From: "Chris Stone" <c-stone@att.net>
Subject: Re: How to open and append to a file
Message-Id: <TSni5.10705$ZL5.667074@bgtnsc07-news.ops.worldnet.att.net>
Well, I managed to find a Perl FAQ here
http://www.perl.com/CPAN-local/doc/FAQs/FAQ/PerlFAQ.html. Most of it's over
my head, as I'm just beginning but I did manage to write a script that may
or may not work. I do have a few questions that I could not find in the
above FAQ:
Can Perl open and write to an existing HTML document? And does this document
need to have any special CHMOD commands?
Thanks,
Chris
Here is my script if you are curious:
#!/usr/bin/perl
#read the form data using cgi-lib
require "cgi-lib.pl";
&ReadParse;
$name=%in{name};
$email=%in{email};
$homepage=%in{homepage};
$location=%in{location};
$reference=%in{reference};
$comments=%in{comments};
#open html file that contains previous entries
open (GBENTRIES, "../gbentries.html");
#copy entire document into an array
@gbentries=<GBENTRIES>;
close (GBENTRIES);
#open the same html file to be written over
open (GBENTRIES, ">../gbentries.html");
for $i; $i <= @#gbentries; $i++
{
#write each line of the array into html file
print GBENTRIES "\n$gbentries[i]";
#until it reads <!--**--> which is a placeholder for the new entry
if ($gbentries[i] =~/<!--**-->/)
{
#start writing the new entry
print GBENTRIES "<P><B>Name: </B>$name</P>;
print GBENTRIES "<P><B>E-mail: </B>$email</P>;
print GBENTRIES "<P><B>Homepage: </B>$homepage</P>;
print GBENTRIES "<P><B>Location: </B>$location</P>;
print GBENTRIES "<P><B>Found page by: </B>$reference</P>;
print GBENTRIES "<P><B>Comments: </B>$commments</P>;
}
#continue copying old entries from the array
}
#end
This script would read from and write to an html file named "gbentries.html"
which contains a line "<!--**--> which is where the script would place the
new entry.
"Chris Stone" <c-stone@att.net> wrote in message
news:fhji5.3583$gW5.182419@bgtnsc04-news.ops.worldnet.att.net...
> I'm trying to write a guestbook script that will log each entry on top of
> all existing entries. I'm pretty new to CGI programming, so I'm not sure
how
> this is done. I'm not very familiar with the 'open' and '>>' command, but
as
> I understand '>>' will write to the bottom of the file. But how would I
> write to the top of the file, yet below the opening HTML tags (assuming
the
> file being changed is an HTML file)?
>
> Thanks,
> Chris
>
>
------------------------------
Date: Thu, 03 Aug 2000 23:28:59 GMT
From: sotoo@my-deja.com
Subject: Re: I need a Perl developer
Message-Id: <8mcv7l$kal$1@nnrp1.deja.com>
In article <COli5.138$xp4.21251@news1.primary.net>,
"EPIC" <EPICSTAFFING@EMAIL.COM> wrote:
> I am looking for a Perl developer, with Apache, Linux, My SQL
development
> skills to help me build a website.
> If you are available for sidework please drop me a line.
>
> Thanks Tom
>
>
Tom:
I am available. Drop me a line so we can talk. My e-mail is
sotoo@excite.com.
Omar
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 03 Aug 2000 23:23:33 GMT
From: sotoo@excite.com
Subject: Interaction with OS
Message-Id: <8mcutg$k07$1@nnrp1.deja.com>
Does anyone know of a module or modules that will provide me with the
following information from the host computer:
BIOS
IP Address
Hard Drive Size and available
Memory Installed
Processor Type
Windows Directory
The program is intended to run on Windows environemnt.
Thank You,
Omar Soto
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 3 Aug 2000 22:22:59 GMT
From: Ilmari Karonen <iltzu@sci.invalid>
Subject: Re: Interpolating strings--special characters, _not_ variables
Message-Id: <965341183.23817@itz.pp.sci.fi>
In article <p5hf92kwlv.fsf@nortelnetworks.com>, Paul D. Smith wrote:
>%% Ilmari Karonen <iltzu@sci.invalid> writes:
> ik> Just say "NO" to eval.
>
>Why?
my $string = '@{[`rm -rf *`]}';
--
Ilmari Karonen - http://www.sci.fi/~iltzu/
"The screwdriver *is* the portable method." -- Abigail
Please ignore Godzilla and its pseudonyms - do not feed the troll.
------------------------------
Date: Thu, 03 Aug 2000 23:42:49 GMT
From: arthur <star@sonic.net>
Subject: launch a browser and get a URL
Message-Id: <B5AEA8CF.4042%star@sonic.net>
Greetings,
I am not sure how to do this so help is greatly appreciated and please be
patient with my ignorance. I want to open a browser off my Desktop and be at
a specific URL.
~arthur
star@sonic.net
------------------------------
Date: Thu, 03 Aug 2000 23:48:02 GMT
From: marcel@codewerk.com (Marcel Grunauer)
Subject: Re: launch a browser and get a URL
Message-Id: <slrn8ok1f0.djb.marcel@gandalf.local>
On Thu, 03 Aug 2000 23:42:49 GMT, arthur <star@sonic.net> wrote:
>I am not sure how to do this so help is greatly appreciated and please be
>patient with my ignorance. I want to open a browser off my Desktop and be at
>a specific URL.
Sure. Just double-click the icon of your browser and enter the URL in
the textbox near the top of the browser window, then press Enter.
--
Marcel
sub AUTOLOAD{($_=$AUTOLOAD)=~s;^.*::;;;y;_; ;;print} Just_Another_Perl_Hacker();
------------------------------
Date: 03 Aug 2000 19:04:04 -0500
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: launch a browser and get a URL
Message-Id: <87snslvqmj.fsf@limey.hpcc.uh.edu>
>> On Thu, 03 Aug 2000 23:42:49 GMT,
>> arthur <star@sonic.net> said:
> Greetings, I am not sure how to do this so help is
> greatly appreciated and please be patient with my
> ignorance. I want to open a browser off my Desktop and
> be at a specific URL.
And your perl issue is...?
t
--
"With $10,000, we'd be millionaires!"
Homer Simpson
------------------------------
Date: Fri, 04 Aug 2000 00:13:51 GMT
From: arthur <star@sonic.net>
Subject: Re: launch a browser and get a URL
Message-Id: <B5AEB016.461C%star@sonic.net>
in article slrn8ok1f0.djb.marcel@gandalf.local, Marcel Grunauer at
marcel@codewerk.com wrote on 8/3/00 3:48 PM:
I want to open a browser off my Desktop and be at
>> a specific URL.
> Sure. Just double-click the icon of your browser and enter the URL in
> the textbox near the top of the browser window, then press Enter.
>
Thanks but I want a perl script to do it. Is that possible?
~arthur
------------------------------
Date: Fri, 04 Aug 2000 00:18:44 GMT
From: arthur <star@sonic.net>
Subject: Re: launch a browser and get a URL
Message-Id: <B5AEB13A.4749%star@sonic.net>
in article 87snslvqmj.fsf@limey.hpcc.uh.edu, Tony Curtis at
tony_curtis32@yahoo.com wrote on 8/3/00 4:04 PM:
>> ignorance. I want to open a browser off my Desktop and
>> be at a specific URL.
>
> And your perl issue is...?
>
> t
I use Macperl 5 Is that what you mean by issue?
~arthur
------------------------------
Date: Thu, 03 Aug 2000 22:59:31 GMT
From: "Jerry Linch" <jlinch@mediaone.net>
Subject: Need help with COM object
Message-Id: <nPmi5.925$ed4.189710@typhoon-news1.southeast.rr.com>
I am attempting to use a COM object I've written with a Perl script. The
interface is based on IDispatch and the method in the IDL looks like this:
[id(1), helpstring("method ProcessImportData")] HRESULT
ProcessImportData([in]BSTR bstrInputRecord, [out,retval]BSTR *bstrOutput);
The method is called like this from a subroutine:
$strOut = $ex->ProcessImportData ($strInput);
Where $strInput is a formatted input string and is declared as: local
($strInput, $strOut);. Within the COM object (written in C++), I dump the
input to a file and I get what I expect there. Just before returning from
the method, the following statement is executed:
*bstrOutput =SysAllocString (bstrOutString);
Where bstrOutString is the formatted output I want. BTW - I've tested this
from a C++ application and it works.
The problem I'm having is that $strOut doesn't seem to contain anything.
When I attempt to print it thusly:
print "$strStatus\n";
I get nothing. I'm a newbie with Perl, so I figure I'm missing something,
most likely terribly obvious. How do I get my output?
Thanks in advance for any and all suggestions.
Jerry Linch
jlinch@mediaone.net
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V9 Issue 3907
**************************************
