[18315] in Perl-Users-Digest
Perl-Users Digest, Issue: 483 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Mar 13 18:10:36 2001
Date: Tue, 13 Mar 2001 15:10:17 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <984525016-v10-i483@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Tue, 13 Mar 2001 Volume: 10 Number: 483
Today's topics:
Re: converting text to hex? (Randal L. Schwartz)
Re: converting text to hex? <stephenk@cc.gatech.edu>
Re: converting text to hex? (Jay Tilton)
Re: converting text to hex? <mail@ericmarques.net>
Re: converting text to hex? (Randal L. Schwartz)
Re: converting text to hex? <uri@sysarch.com>
Does Perl have an un-getc <ttracy@houston.rr.com>
Re: Does Perl have an un-getc (Greg Bacon)
Re: Does Perl have an un-getc <maheshasolkar@yahoo.com>
Re: Does Perl have an un-getc <ttracy@houston.rr.com>
Re: Formatting HTML using Perl (Randal L. Schwartz)
Re: Formatting HTML using Perl <terrence.brannon@oracle.com>
HTTP Client Question (Al Spohn)
Re: HTTP Client Question <galen.menzel@mail.utexas.edu>
Re: HTTP Client Question (Abigail)
Re: HTTP Client Question <spohn@mayo.edu>
Re: HTTP Client Question (Abigail)
IO::Socket::SSL question <barry@website.ws>
Re: LWP problem <Geoffrey.Kinnel@bms.com>
Re: Macbeth and Perl threads <vdhamer@msn.com>
perlcc on Win32 failing <jmccaske@pervasive.com>
Re: Running a UNIX command from inside a perl script (Tad McClellan)
Re: want create `my' arrays whose names are stored in a nobull@mail.com
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 13 Mar 2001 11:05:54 -0800
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: converting text to hex?
Message-Id: <m1g0gho5f1.fsf@halfdome.holdit.com>
>>>>> "Eric" == Eric <mail@ericmarques.net> writes:
Eric> how do i convert text to hex code?
Eric> like to covert "a" to "61" etc...
What's the larger context of this question? Why would you want to do that?
If it's for URI-escaping, there's a module for that.
If it's for attaching as an email message, there's a module for that.
Even if you have more than one character to do, the easiest way to do
one character is not the easiest way to do more than one character.
Context, man. Context!
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Tue, 13 Mar 2001 14:09:59 -0500
From: Stephen Kloder <stephenk@cc.gatech.edu>
Subject: Re: converting text to hex?
Message-Id: <3AAE7087.42C6DE42@cc.gatech.edu>
Eric wrote:
>
> yep ord works good
> but i wanted to convert a whole text file at once and then be able to covert
> it back
>
Something like:
$hex =join '', map {sprintf '%2X',$_} split //,$asc;
or:
$str =~ s/(.)/sprintf '%2X',$1/ge;
or:
$hex = unpack('H*',$asc);
perldoc perlop
perldoc -f pack
--
Stephen Kloder | "I say what it occurs to me to say.
stephenk@cc.gatech.edu | More I cannot say."
Phone 404-874-6584 | -- The Man in the Shack
ICQ #65153895 | be :- think.
------------------------------
Date: Tue, 13 Mar 2001 19:51:00 GMT
From: tiltonj@erols.com (Jay Tilton)
Subject: Re: converting text to hex?
Message-Id: <3aae7869.83403359@news.erols.com>
On Tue, 13 Mar 2001 18:48:00 GMT, "Eric" <mail@ericmarques.net> wrote:
>yep ord works good
>but i wanted to convert a whole text file at once and then be able to covert
>it back
A peculiar task, but if that's what you really want, 'pack' and
'unpack' may be useful.
perldoc -f pack
#!/usr/bin/perl -w
use strict;
my $string = 'This is my string. I hope it comes back alive.';
my $string_in_hex = unpack('H*', $string);
my $string_as_characters = pack('H*', $string_in_hex);
print "Original string:\n$string\n\n";
print "Hex-ified string:\n$string_in_hex\n\n";
print "De-hex-ified string:\n$string_as_characters\n\n";
if ($string_as_characters eq $string) {
print "Golly! That crazy gizmo really works!\n";
} else {
print "My string was destroyed. *sniff*\n";
}
------------------------------
Date: Tue, 13 Mar 2001 19:54:05 GMT
From: "Eric" <mail@ericmarques.net>
Subject: Re: converting text to hex?
Message-Id: <xVur6.17058$PF4.21165@news.iol.ie>
Thanks guys
Randal directed my twards the URI Escaping module
Although what i want to do has nothing to do with URI this module works
perfectly after i remove the % from the output
--
Eric Marques
mail@ericmarques.net
"Eric" <mail@ericmarques.net> wrote in message
news:AItr6.17025$PF4.20984@news.iol.ie...
> how do i convert text to hex code?
> like to covert "a" to "61" etc...
>
> Thanks
>
> --
> Eric Marques
> mail@ericmarques.net
>
>
------------------------------
Date: 13 Mar 2001 12:00:27 -0800
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: converting text to hex?
Message-Id: <m1zoepl9r8.fsf@halfdome.holdit.com>
>>>>> "Eric" == Eric <mail@ericmarques.net> writes:
Eric> No not just numbers, all ascii characters
Eric> basically i want to do this
Eric> i will open a file to $filecontents
Eric> convert $filecontents to hex $filehex
Eric> then later on i want to convert $filehex back to the original $filecontents
Is anything besides homework? Is there a practical need for this?
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Tue, 13 Mar 2001 21:32:08 GMT
From: Uri Guttman <uri@sysarch.com>
Subject: Re: converting text to hex?
Message-Id: <x7zoep9wyv.fsf@home.sysarch.com>
>>>>> "E" == Eric <mail@ericmarques.net> writes:
E> Randal directed my twards the URI Escaping module Although what i
E> want to do has nothing to do with URI this module works perfectly
E> after i remove the % from the output
then the module does not work perfectly for you. that is very silly
using a module for the wrong reason and then fixing the output.
use unpack which is builtin and is the best way to hex print a large
amount of data. plenty of examples in this thread.
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: Tue, 13 Mar 2001 19:40:53 GMT
From: "Tim Tracy" <ttracy@houston.rr.com>
Subject: Does Perl have an un-getc
Message-Id: <9Jur6.52503$YC1.12363713@typhoon.austin.rr.com>
This is a newbie question.
I am reading from a text file one byte at a time useing getc().
I want to be able to look ahead in the file a few characters and still keep
my place in the file.
For example,
if the text file had '123abc'
I would like to be able to read in the "1", then read in the "2" then the
"3". Under certain circumstances I would like to be able to put the "2" and
the "3" back in the file buffer and reposition the file pointer so it looks
like I just read in the "1" again.
Is there a way to do this in Perl?
I have looked in perldoc -f (getc, read, syread)
Thanks,
------------------------------
Date: Tue, 13 Mar 2001 20:16:03 -0000
From: gbacon@HiWAAY.net (Greg Bacon)
Subject: Re: Does Perl have an un-getc
Message-Id: <tat003chpod78@corp.supernews.com>
In article <9Jur6.52503$YC1.12363713@typhoon.austin.rr.com>,
Tim Tracy <ttracy@houston.rr.com> wrote:
: I am reading from a text file one byte at a time useing getc().
That's the C-ish way to do it, and if you can purge yourself of the
character-at-a-time demons then there are often more natural ways to
munge strings in Perl.
: I want to be able to look ahead in the file a few characters and still keep
: my place in the file.
:
: For example,
:
: if the text file had '123abc'
:
: I would like to be able to read in the "1", then read in the "2" then the
: "3". Under certain circumstances I would like to be able to put the "2" and
: the "3" back in the file buffer and reposition the file pointer so it looks
: like I just read in the "1" again.
:
: Is there a way to do this in Perl?
Here's a little program that does what you're describing:
% cat input
123abc
% cat try
#! /usr/local/bin/perl -w
use strict;
use Fcntl qw/ SEEK_CUR /;
open IN, "input" or die "$0: open input: $!\n";
my $back_that_ass_up = 1;
while (my $c = getc IN) {
printf "GOT: '$c' (0x%02x)\n", unpack "C" => $c;
if ($c eq '3' && $back_that_ass_up) {
seek IN, -2, SEEK_CUR or die "$0: seek: $!\n";
$back_that_ass_up = 0;
}
}
% ./try
GOT: '1' (0x31)
GOT: '2' (0x32)
GOT: '3' (0x33)
GOT: '2' (0x32)
GOT: '3' (0x33)
GOT: 'a' (0x61)
GOT: 'b' (0x62)
GOT: 'c' (0x63)
GOT: '
' (0x0a)
%
Perl's tell operator will tell you your current position in a file.
Hope this helps,
Greg
--
Micro-optimizations are useless but dangerous hobgoblins that
haunt the deluded minds of uncounted programmers of small capability.
-- Tom Christiansen in <36cdadec@csnews>
------------------------------
Date: Tue, 13 Mar 2001 12:22:23 -0800
From: "Mahesh A" <maheshasolkar@yahoo.com>
Subject: Re: Does Perl have an un-getc
Message-Id: <tat0c1dv7jf451@corp.supernews.com>
"Tim Tracy" <ttracy@houston.rr.com> wrote in message
news:9Jur6.52503$YC1.12363713@typhoon.austin.rr.com...
> This is a newbie question.
>
> I am reading from a text file one byte at a time useing getc().
>
> I want to be able to look ahead in the file a few characters and still
keep
> my place in the file.
>
> For example,
>
> if the text file had '123abc'
>
> I would like to be able to read in the "1", then read in the "2" then the
> "3". Under certain circumstances I would like to be able to put the "2"
and
> the "3" back in the file buffer and reposition the file pointer so it
looks
> like I just read in the "1" again.
>
> Is there a way to do this in Perl?
>
> I have looked in perldoc -f (getc, read, syread)
>
> Thanks,
May be IO::Handle helps.
- M.
------------------------------
Date: Tue, 13 Mar 2001 20:21:45 GMT
From: "Tim Tracy" <ttracy@houston.rr.com>
Subject: Re: Does Perl have an un-getc
Message-Id: <tjvr6.57615$Fz.12400366@typhoon.austin.rr.com>
Greg,
Thanks for your prompt reply. It will experiment with your suggestions.
Tim
"Greg Bacon" <gbacon@HiWAAY.net> wrote in message
news:tat003chpod78@corp.supernews.com...
> In article <9Jur6.52503$YC1.12363713@typhoon.austin.rr.com>,
> Tim Tracy <ttracy@houston.rr.com> wrote:
>
> : I am reading from a text file one byte at a time useing getc().
>
> That's the C-ish way to do it, and if you can purge yourself of the
> character-at-a-time demons then there are often more natural ways to
> munge strings in Perl.
>
> : I want to be able to look ahead in the file a few characters and still
keep
> : my place in the file.
> :
> : For example,
> :
> : if the text file had '123abc'
> :
> : I would like to be able to read in the "1", then read in the "2" then
the
> : "3". Under certain circumstances I would like to be able to put the "2"
and
> : the "3" back in the file buffer and reposition the file pointer so it
looks
> : like I just read in the "1" again.
> :
> : Is there a way to do this in Perl?
>
> Here's a little program that does what you're describing:
>
> % cat input
> 123abc
> % cat try
> #! /usr/local/bin/perl -w
>
> use strict;
>
> use Fcntl qw/ SEEK_CUR /;
>
> open IN, "input" or die "$0: open input: $!\n";
>
> my $back_that_ass_up = 1;
> while (my $c = getc IN) {
> printf "GOT: '$c' (0x%02x)\n", unpack "C" => $c;
>
> if ($c eq '3' && $back_that_ass_up) {
> seek IN, -2, SEEK_CUR or die "$0: seek: $!\n";
> $back_that_ass_up = 0;
> }
> }
> % ./try
> GOT: '1' (0x31)
> GOT: '2' (0x32)
> GOT: '3' (0x33)
> GOT: '2' (0x32)
> GOT: '3' (0x33)
> GOT: 'a' (0x61)
> GOT: 'b' (0x62)
> GOT: 'c' (0x63)
> GOT: '
> ' (0x0a)
> %
>
> Perl's tell operator will tell you your current position in a file.
>
> Hope this helps,
> Greg
> --
> Micro-optimizations are useless but dangerous hobgoblins that
> haunt the deluded minds of uncounted programmers of small capability.
> -- Tom Christiansen in <36cdadec@csnews>
------------------------------
Date: 13 Mar 2001 11:16:13 -0800
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: Formatting HTML using Perl
Message-Id: <m1wv9tmqde.fsf@halfdome.holdit.com>
>>>>> "Michael" == Michael D Kirkpatrick <wizard@psychodad.com> writes:
Michael> Like <P> does not necessarily have to have a </P> tag.
It does in XHTML, which is what the world is moving to. And if you
had been using CGI.pm's HTML shortcuts, you're already generating
nearly all of XHTML correctly anyway. :)
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com - The #1 Newsgroup Service in the World!
-----== Over 80,000 Newsgroups - 16 Different Servers! =-----
------------------------------
Date: Tue, 13 Mar 2001 14:02:34 -0800
From: Terrence Monroe Brannon <terrence.brannon@oracle.com>
Subject: Re: Formatting HTML using Perl
Message-Id: <3AAE98FA.3D3A76C8@oracle.com>
>
>
> CPAN has various HTML parsing modules. One is called HTML Parser.
>
> It will do what you want.
>
> It used in long ago, so my recollection may be hazy. Each tag can have an
> event handler. Because it's OO you only need to write one handler, all
> the tags can use it.
>
These days, it is suggested to use HTML::TreeBuilder or HTML::TokeParser
instead...
--
Terrence Brannon
Oracle Corporation
500 Oracle Parkway
M/S 3op1556a
Redwood Shores, CA 94065
(650) 607-5482
------------------------------
Date: Tue, 13 Mar 2001 13:16:16 -0500
From: spohn@mayo.edu (Al Spohn)
Subject: HTTP Client Question
Message-Id: <spohn-ya02408000R1303011316160001@mayonews>
I'm trying to write a simple http client using, for the most part, code
from the ORA http client programming book. I'm finding that, within our
firewall, I'm running into an inordinate number of 500 errors,
specifically:
500: Server Error [10-0004]
The same code seems to work fine on everything outside the firewall. How
can I dig for more specifics on what might be happening? These are pages
that require no form of authentication. I haven't found anything in the
Apache documentation that references this kind of thing with any
specificity.
Thanks in advance,
Al
------------------------------
Date: Tue, 13 Mar 2001 13:48:46 -0600
From: Galen Menzel <galen.menzel@mail.utexas.edu>
Subject: Re: HTTP Client Question
Message-Id: <3AAE799E.2D394361@mail.utexas.edu>
Al Spohn wrote:
>
> I'm trying to write a simple http client using, for the most part, code
> from the ORA http client programming book. I'm finding that, within our
> firewall, I'm running into an inordinate number of 500 errors,
> specifically:
>
> 500: Server Error [10-0004]
>
> The same code seems to work fine on everything outside the firewall. How
> can I dig for more specifics on what might be happening?
Although this is a rather heavy-handed solution, I would install CGIWrap. This
is a program whose main function is to execute a user's CGI scripts as the user
instead of as the owner of the web server. But it also has some great
diagnostic and debugging tools that can make HTTP's rather opaque error
reporting a bit clearer. You can get it here:
http://cgiwrap.unixtools.org/
Good luck.
galen
------------------------------
Date: 13 Mar 2001 21:23:20 GMT
From: abigail@foad.org (Abigail)
Subject: Re: HTTP Client Question
Message-Id: <slrn9at3u8.c5n.abigail@tsathoggua.rlyeh.net>
Al Spohn (spohn@mayo.edu) wrote on MMDCCLI September MCMXCIII in
<URL:news:spohn-ya02408000R1303011316160001@mayonews>:
$$ I'm trying to write a simple http client using, for the most part, code
$$ from the ORA http client programming book. I'm finding that, within our
$$ firewall, I'm running into an inordinate number of 500 errors,
$$ specifically:
$$
$$ 500: Server Error [10-0004]
$$
$$ The same code seems to work fine on everything outside the firewall. How
$$ can I dig for more specifics on what might be happening? These are pages
$$ that require no form of authentication. I haven't found anything in the
$$ Apache documentation that references this kind of thing with any
$$ specificity.
Your posting is completely Perl free.
Abigail
------------------------------
Date: Tue, 13 Mar 2001 15:59:30 -0600
From: "Al Spohn" <spohn@mayo.edu>
Subject: Re: HTTP Client Question
Message-Id: <98m58p$5ie$1@tribune.mayo.edu>
My apologies, but by posting in this group, coupled with my reference to a
Perl book on http client programming, I thought people would (correctly)
assume that Perl was the tool in question. One concievable answer could
have been that an object in, say, the LWP libraries would be useful in
extracting more detailed error information from apache. So my question may
not have been Perl specific, but the answer could/might well have been.
#!/usr/bin/perl
There, now I'm no longer "perl free."
- Al
Abigail <abigail@foad.org> wrote in message
news:slrn9at3u8.c5n.abigail@tsathoggua.rlyeh.net...
> Al Spohn (spohn@mayo.edu) wrote on MMDCCLI September MCMXCIII in
> <URL:news:spohn-ya02408000R1303011316160001@mayonews>:
> $$ I'm trying to write a simple http client using, for the most part, code
> $$ from the ORA http client programming book. I'm finding that, within
our
> $$ firewall, I'm running into an inordinate number of 500 errors,
> $$ specifically:
> $$
> $$ 500: Server Error [10-0004]
> $$
> $$ The same code seems to work fine on everything outside the firewall.
How
> $$ can I dig for more specifics on what might be happening? These are
pages
> $$ that require no form of authentication. I haven't found anything in
the
> $$ Apache documentation that references this kind of thing with any
> $$ specificity.
>
>
> Your posting is completely Perl free.
>
>
>
> Abigail
------------------------------
Date: 13 Mar 2001 22:28:10 GMT
From: abigail@foad.org (Abigail)
Subject: Re: HTTP Client Question
Message-Id: <slrn9at7nq.c5n.abigail@tsathoggua.rlyeh.net>
Al Spohn (spohn@mayo.edu) wrote on MMDCCLI September MCMXCIII in
<URL:news:98m58p$5ie$1@tribune.mayo.edu>:
.. My apologies, but by posting in this group, coupled with my reference to a
.. Perl book on http client programming, I thought people would (correctly)
.. assume that Perl was the tool in question. One concievable answer could
.. have been that an object in, say, the LWP libraries would be useful in
.. extracting more detailed error information from apache. So my question may
.. not have been Perl specific, but the answer could/might well have been.
..
.. #!/usr/bin/perl
..
.. There, now I'm no longer "perl free."
Instead, you're Jeopardy compliant.
*plonk*
Abigail
--
perl5.004 -wMMath::BigInt -e'$^V=Math::BigInt->new(qq]$^F$^W783$[$%9889$^F47]
.qq]$|88768$^W596577669$%$^W5$^F3364$[$^W$^F$|838747$[8889739$%$|$^F673$%$^W]
.qq]98$^F76777$=56]);$^U=substr($]=>$|=>5)*(q.25..($^W=@^V))=>do{print+chr$^V
%$^U;$^V/=$^U}while$^V!=$^W'
------------------------------
Date: Tue, 13 Mar 2001 14:31:01 -0800
From: "Barry Trottier" <barry@website.ws>
Subject: IO::Socket::SSL question
Message-Id: <3aae9f8d$0$11479@wodc7nh7.news.uu.net>
I have set up a script using IO::Socket::SSL. It works fine, the problem is
that for some reason the Socket is only allowing connections via SSL3. I
need to be able to allow SSL2 connections as well.
Here is my Socket creation code:
$sock = IO::Socket::SSL->new( Listen => 25,
LocalPort => 648,
Proto => 'tcp',
Reuse => 1,
SSL_verify_mode => 0x01,
)
Thanks for any help in advance!
------------------------------
Date: Tue, 13 Mar 2001 14:05:55 -0500
From: Geoffrey C Kinnel <Geoffrey.Kinnel@bms.com>
Subject: Re: LWP problem
Message-Id: <3AAE6F93.2DF8C4C1@bms.com>
"David J. Marcus" wrote:
> I tried the simple program provided on CPAN:
> use LWP:Simple;
> my $content = get("http://www.yahoo.com");
> print "LWP::Simple: get of Yahoo: ", $content, "\n";
>
> I get an error (apparently after the operation times out):
> Request failed: Can't connect to www.yahoo.com:80 <Bad hostname
> 'www.yahoo.com'>
While the error implies DNS failure, if you can get there by other means, then
it's probably not DNS. Do you use an http proxy? If you do, you have to let
LWP::Simple know.
gk
------------------------------
Date: Wed, 14 Mar 2001 00:04:07 +0100
From: "Peter van den Hamer" <vdhamer@msn.com>
Subject: Re: Macbeth and Perl threads
Message-Id: <98m8v2$4es$1@news.IAEhv.nl>
"Rocco Caputo" <troc@netrus.net> wrote
> I've written a multi-host ping program in perl without threads.
> Have you seen poing? http://poe.perl.org/poegrams/index.html#poing
>
> -- Rocco Caputo / troc@netrus.net / poe.perl.org / poe.sourceforge.net
Will look into your program.
The screen output appears comparable, but optimized for somewhat
different goals. In any case you seem to have things I avoided till now:
colors,
high-res timing. And I didn't manage to have overlapping Net::Ping calls
(cause it doesn't seem to be reentrant).
Glad to see that you also ran into the need for root privilege ;-)
And I use stuff you explicitly avoided: threads (partly because
I needed a thread refresher: it's 15 years since I wrote my own
real-time excecutive with built-in native 8086 compiler, all rolled up
*inside* an MS-DOS device driver - obviously ;-)
Peter
------------------------------
Date: Tue, 13 Mar 2001 22:30:37 GMT
From: "Jim McCaskey" <jmccaske@pervasive.com>
Subject: perlcc on Win32 failing
Message-Id: <hcxr6.3$Da.2886@dca1-nnrp2.news.digex.net>
Hello,
I am attempting to use perlcc on Activestates Win32 distro. I am having a
very odd problem with it. I am getting a "The system cannot find the file
specified." error. Anyone seen this before? I think it has something to do
with the -u<none> but can't figure out what is goint on.
-Jim
E:\work\hello>perlcc hello.pl
----------------------------------------------------------------------------
----
Compiling hello.pl:
----------------------------------------------------------------------------
----
Making C(hello.pl.c) for hello.pl!
D:\Perl\bin\Perl.exe -ID:/Perl/lib -ID:/Perl/site/lib -I. -MB::Stash -c
hello.pl
D:\Perl\bin\Perl.exe -ID:/Perl/lib -ID:/Perl/site/lib -I. -MO=C,-l2000,-umai
n,-uattributes,-uDB,-u<
one>,-uWin32 hello.pl
The system cannot find the file specified.
ERROR: In generating code for hello.pl!
E:\work\hello>cat hello.pl
print "Hello world\n";
D:\Perl\site\lib\Win32>perl -v
This is perl, v5.6.0 built for MSWin32-x86-multi-thread
(with 1 registered patch, see perl -V for more detail)
Copyright 1987-2000, Larry Wall
Binary build 623 provided by ActiveState Tool Corp.
http://www.ActiveState.com
Built 16:27:07 Dec 15 2000
Perl may be copied only under the terms of either the Artistic License or
the
GNU General Public License, which may be found in the Perl 5.0 source kit.
Complete documentation for Perl, including FAQ lists, should be found on
this system using `man perl' or `perldoc perl'. If you have access to the
Internet, point your browser at http://www.perl.com/, the Perl Home Page.
------------------------------
Date: Tue, 13 Mar 2001 14:34:43 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Running a UNIX command from inside a perl script
Message-Id: <slrn9astij.vnv.tadmc@tadmc26.august.net>
White, Shawn [CAR:4B59:EXCH] <bixby@americasm01.nt.com> wrote:
>How do I call a UNIX command from inside a perl script? I'm just
>starting the O'Rielly Learning Perl and curious about this...
Skip ahead to Chapter 14 (Process Management) then.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 13 Mar 2001 18:52:31 +0000
From: nobull@mail.com
Subject: Re: want create `my' arrays whose names are stored in an array reference passed to my subroutine...
Message-Id: <u91ys18psg.fsf@wcl-l.bham.ac.uk>
wtautz@math.uwaterloo.ca (Walter Tautz [MFCF]) writes:
> Subject: Re: want create `my' arrays whose names are stored in an array reference passed to my subroutine...
You want to use sybolic references. Stop wanting that. Anyhow you
can't use symbolic references to lexical variables. Use an
appropriate data structure (see perldoc perldsc). And don't forget
that push() exists.
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
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 V10 Issue 483
**************************************
