[28471] in Perl-Users-Digest
Perl-Users Digest, Issue: 9835 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Oct 12 03:05:51 2006
Date: Thu, 12 Oct 2006 00:05:06 -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, 12 Oct 2006 Volume: 10 Number: 9835
Today's topics:
CGI Error in wwwboard duke@douglasadams.se
Re: Firefox Won't Execute My Perl Script <mgarrish@gmail.com>
Re: Input into Net::Netmask <someone@example.com>
Re: Input into Net::Netmask (reading news)
Re: LWP and Unicode <benmorrow@tiscali.co.uk>
Re: LWP and Unicode <jurgenex@hotmail.com>
Net::SSH stuck <peretz.eyal@gmail.com>
Re: Net::SSH stuck usenet@DavidFilmer.com
Re: Net::SSH stuck usenet@DavidFilmer.com
Re: Net::SSH stuck usenet@DavidFilmer.com
Re: Net::SSH stuck <habett@habett.org>
new CPAN modules on Thu Oct 12 2006 (Randal Schwartz)
openGL-0.5 perl module problem <thedwig@gmail.com>
Re: Running scripts on the Exceed <peretz.eyal@gmail.com>
Sorting and moving files to dir for DVD burn <romorris@bellsouth.net>
Re: Standard output problem wesphillips@gmail.com
Re: Standard output problem wesphillips@gmail.com
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 11 Oct 2006 23:53:44 -0700
From: duke@douglasadams.se
Subject: CGI Error in wwwboard
Message-Id: <1160636024.472351.277890@c28g2000cwb.googlegroups.com>
Hi
I'm trying to set up Matt Wrights wwwboard
(http://www.scriptarchive.com/wwwboard.html) on one of my sites
(www.bbbb.se/forum/wwwboard.html), but when I try to make a post, I get
error message: "The specified CGI application misbehaved by not
returning a complete set of HTTP headers."
Can anyone dig what that is about and help me?
------------------------------
Date: 11 Oct 2006 18:51:20 -0700
From: "Matt Garrish" <mgarrish@gmail.com>
Subject: Re: Firefox Won't Execute My Perl Script
Message-Id: <1160617880.338949.136670@m7g2000cwm.googlegroups.com>
Mirco Wahab wrote:
> Thus spoke Matt Garrish (on 2006-10-11 23:08):
> > Mirco Wahab wrote:
> >> Thus spoke Sherm Pendley (on 2006-10-11 16:36):
> >> > "Matt Garrish" <mgarrish@gmail.com> writes:
> >> >> Sherm Pendley wrote:
> >> >>> robic0 writes:
> >> >>> > Hey Jew there must be something that is Perl used heavily in pag=
e production.
> >> >>> > Jeez what could it be. Oh well, it must be a fuckin secret......=
.=2E
> >> >>> 'PerlScript' ne 'Perl'. Perl is used heavily. PerlScript - ActiveS=
tate's
> >> >> True and not so true. ...
> >> > 'very rarely' ne 'never'. :-)
> >> > ...
> >> > Robic0 took J=FCrgen's statement as saying that *Perl itself* is rar=
ely used.
> >> > I guess he just can't resist an opportunity to make a fool of himsel=
f in
> >> > public.
> >
> >> [trust no one but this ... (from the "riddle of the steel")]
> >> ... like the swords in warfare died with the men who lived by them ...
> >
> > Sorry, are you trying to be prophetic? I haven't followed the group a
> > lot lately, but you seem to have a thing for sword metaphors.
>
> IIRC did I do *one* another thing like that
> where I tried to be funny or so ...
>
> > If you want to prophesy the demise of Perl get in line with
> > everyone who's been predicting its doom since the advent of
> > the web.
>
> Actually, the "advent of the web" was (afaik) in
> coincidence with the advent of Perl5 and it's CGI
> revolution of things.
>
> BTW, I always tell younger people to use Perl and
> give them examples=B9 for this and for that. When they
> leave and go into some other context, they will never
> do any Perl out there, they'd do Ruby or Python or
> the like - if they don't get into Java in the first
> place.
>
> Why is that? Am I wrong and short sighted? Don't
> I see the whole thing? As much as I like to work
> with Perl, as dark I foresee its perspectives.
>
I've never applied for a job where Perl was a primary requirement, and
I've never had a job where Perl wasn't an intergral part of the system.
What does that tell you?
And really, so what if it dies off? If it does it will be because
there's something ever better and simpler to use to accomplish the
myriad of tasks Perl can, but that something hasn't come and your
foretelling Perl's demise with nothing to back it up but perceived
foresight isn't going to make that day come any sooner.
So rather than lament something that I doubt is going to happen for a
good long time, why don't you just enjoy using the language for what it
makes simpler in your life.
Matt
------------------------------
Date: Thu, 12 Oct 2006 02:43:01 GMT
From: "John W. Krahn" <someone@example.com>
Subject: Re: Input into Net::Netmask
Message-Id: <VYhXg.9913$P7.6907@edtnps90>
Mumia W. (reading news) wrote:
> On 10/11/2006 06:08 PM, mdeggers@gmail.com wrote:
>>
>> @blocks = ('10.10.10.0/24','10.10.20.0/24');
>> @vlans = ('vlan_10','vlan_20');
>>
>> for ($i = 0; $i < 3; $i++ )
>
> Your "@blocks" array contains two elements, but you process four.
$ perl -le'for ( $i = 0; $i < 3; $i++ ) { print $i }'
0
1
2
Four?
John
--
Perl isn't a toolbox, but a small machine shop where you can special-order
certain sorts of tools at low cost and in short order. -- Larry Wall
------------------------------
Date: Thu, 12 Oct 2006 04:57:22 GMT
From: "Mumia W. (reading news)" <paduille.4059.mumia.w@earthlink.net>
Subject: Re: Input into Net::Netmask
Message-Id: <SWjXg.6026$Lv3.5347@newsread1.news.pas.earthlink.net>
On 10/11/2006 09:43 PM, John W. Krahn wrote:
> Mumia W. (reading news) wrote:
>> On 10/11/2006 06:08 PM, mdeggers@gmail.com wrote:
>>> @blocks = ('10.10.10.0/24','10.10.20.0/24');
>>> @vlans = ('vlan_10','vlan_20');
>>>
>>> for ($i = 0; $i < 3; $i++ )
>> Your "@blocks" array contains two elements, but you process four.
>
> $ perl -le'for ( $i = 0; $i < 3; $i++ ) { print $i }'
> 0
> 1
> 2
>
> Four?
>
>
>
> John
Oops, that's not four. But I hope the OP gets the idea. The array length
should be gotten from the array (@blocks).
--
Mumia W.
paduille.4059.mumia.w@earthlink.net
This is a temporary e-mail to help me catch some s-p*á/m.
------------------------------
Date: Thu, 12 Oct 2006 00:03:50 +0100
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: LWP and Unicode
Message-Id: <mr9004-e01.ln1@osiris.mauzo.dyndns.org>
Quoth "Peter J. Holzer" <hjp-usenet2@hjp.at>:
> On 2006-10-11 03:03, Ben Morrow <benmorrow@tiscali.co.uk> wrote:
> > Quoth "Peter J. Holzer" <hjp-usenet2@hjp.at>:
> >> On 2006-10-10 18:15, JÃŒrgen Exner <jurgenex@hotmail.com> wrote:
> >> > Ted Zlatanov wrote:
> >> >> On 6 Oct 2006, benmorrow@tiscali.co.uk wrote:
> >> >>> It's not a question of this group's charter, it applies generally on
> >> >>> Usenet. There is no header in a Usenet article that specifies a
> >> >>> charset, so no way to use anything other than the default ASCII.
> >>
> >> Content-Type: text/plain; charset=...
> >>
> >> Introduced in RFC 1341 (June 1992). It is true that RFC 1036 was never
> >> updated, but MIME is current practice on usenet.
> >
> > Really??? I was under the impression it was considered rude.
>
> If it is, then most posters in this group are rude (well, some people
> think this is the case even without MIME :-)).
>
> I have currently 2805 messages from this group in my spool, 1954 of
> which (70%) are MIME messages. Of these, about 1400 use ISO-8859-1,
> about 400 use US-ASCII, about 70 UTF-8, and about 30 ISO-8859-15.
OK, maybe I wasn't clear. What I meant was that actually making any
*use* of MIME (as opposed to simply being passively conformant with it)
such as multipart messages, signed messages; in fact any messages that
are not 'text/plain; charset=us-ascii' appears to me to be considered
rude. It really doesn't matter which of ISO-8859-* or UTF-8 people mark
their message as, as long as they stick to US-ASCII for anything they
want anyone else to be able to read.
> Of these, only charset declarations are (AFAIK) widely used on usenet:
...and those are, in practice, redundant.
> Multipart messages are not needed (except maybe in binary groups, but
> even there uuencode and yenc are preferred), because usenet messages
> usually contain only plain text - other text formats (like HTML) never
> caught on.
Multipart messages and HTML messages are rude.
> Transfer encodings aren't needed because NNTP is in practice 8bit clean.
Transfer encodings aren't needed because Usenet articles are in practice
in US-ASCII, which doesn't need encoding; alse because newsreaders don't
decode them.
> The charset parameter is needed whenever a message contains non-ASCII
> characters. This is of course frequently the case when the language
> isn't English, but it also happens in English - for example in names (I
> notice your newsreader butchered Jürgen's name in the attribution line)
> or because the topic of the conversation is about something which isn't
> easy to express in US-ASCII (for example, unicode problems are a
> frequent topic in this newsgroup). So a newsreader may not need to
> support all 5 MIME RFCs, but if it doesn't at least support text/plain
> with the most frequent charsets and RFC 2047, it's at least a bit of a
> pain.
I completely agree with the sentiment here: the ability to write in
other charsets would be very useful. However, my newsreader, although it
makes some attempt to handle MIME, doesn't appear to handle them at all;
while you could say 'that's your problem' I would respectfully disagree
until 1036 is updated.
Ben
--
Outside of a dog, a book is a man's best friend.
Inside of a dog, it's too dark to read.
benmorrow@tiscali.co.uk Groucho Marx
------------------------------
Date: Thu, 12 Oct 2006 02:42:49 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: LWP and Unicode
Message-Id: <JYhXg.3300$HP.1153@trndny08>
Ben Morrow wrote:
> Transfer encodings aren't needed because Usenet articles are in
> practice in US-ASCII, [...]
Oh, really? I wonder how you write messages in lets say French, German,
Norwegian, Greek, Russian, Chinese, Japanese, Hebrew, Arabic and most other
languages with US-ASCII only.
jue
------------------------------
Date: 11 Oct 2006 22:43:24 -0700
From: "EZP" <peretz.eyal@gmail.com>
Subject: Net::SSH stuck
Message-Id: <1160631804.192613.106290@m73g2000cwd.googlegroups.com>
Hi all,
I'm running the script below in windows command line and the script is
stuck.
(I need to run the unix task from the windows command line.)
#!/usr/bin/perl
use strict; use warnings;
use Net::SSH qw (ssh issh sshopen2 sshopen3);
print Net::SSH::ssh_cmd( {
host => 'host.name',
command => 'ls',
} );
please help, thanks in advance.
EZP
p.s. I downloaded the SSH.pm from CPAN
------------------------------
Date: 11 Oct 2006 23:14:27 -0700
From: usenet@DavidFilmer.com
Subject: Re: Net::SSH stuck
Message-Id: <1160633667.544538.161010@b28g2000cwb.googlegroups.com>
EZP wrote:
> I'm running the script below in windows command line and the script is stuck.
> (I need to run the unix task from the windows command line.)
By 'stuck' do you mean it hangs forever? Have you let it go for a long
time (5-10 minutes) and see if it eventually times-out?
Do you have OpenSSH installed on your machine?
Can you connect to the UNIX host directly from ssh in a terminal
window? If you can't do it from a terminal, you can't do it in Perl
(and the problem, in that case, has nothing to do with Perl).
Is there a firewall between your Windows and UNIX boxes that is
blocking port 22 (the standard SSH port)?
Does your Windows userid exactly match your UNIX userid? If not, you
need to tell the UNIX box which userid you are trying to connect with.
Have you created a PKI key-pair and put the public key in the
authorized_keys file of the $HOME/.ssh directory of the remote user on
the UNIX machine?
> p.s. I downloaded the SSH.pm from CPAN
Downloading is not the same as installing. You actually installed SSH
from a CPAN build onto a Windows machine? You have a development
environment on your Windows box??? That's very unusual (most
Windows-types get their modules from ActiveState).
--
David Filmer (http://DavidFilmer.com)
------------------------------
Date: 11 Oct 2006 23:15:34 -0700
From: usenet@DavidFilmer.com
Subject: Re: Net::SSH stuck
Message-Id: <1160633734.052390.25950@e3g2000cwe.googlegroups.com>
EZP wrote:
> host => 'host.name',
Oh, and you did actually replace that with a valid hostname or IP
address, right?
--
David Filmer (http://DavidFilmer.com)
------------------------------
Date: 11 Oct 2006 23:21:21 -0700
From: usenet@DavidFilmer.com
Subject: Re: Net::SSH stuck
Message-Id: <1160634067.809015.89340@m7g2000cwm.googlegroups.com>
EZP wrote:
> I'm running the script below in windows command line and the script is stuck.
One other thing - you should install Math::BigInt::GMP. It's not
mentioned in the docs, but I have found that it can take a
LOOONNNNGGGGG time (60 seconds) to establish a secure connection
without a fast math module. You will need GMP (from gnu.org) first.
See http://tinyurl.com/jodv8 for more information.
--
David Filmer (http://DavidFilmer.com)
------------------------------
Date: Thu, 12 Oct 2006 08:36:54 +0200
From: Stephane Habett Roux <habett@habett.org>
Subject: Re: Net::SSH stuck
Message-Id: <bae685744e.habett@habett.habett.org>
In message <1160631804.192613.106290@m73g2000cwd.googlegroups.com>
"EZP" <peretz.eyal@gmail.com> wrote:
> #!/usr/bin/perl
> use strict; use warnings;
> use Net::SSH qw (ssh issh sshopen2 sshopen3);
>
>
> print Net::SSH::ssh_cmd( {
> host => 'host.name',
> command => 'ls',
> } );
I don't know this module but i guess there's at least a username
missing.
--
Stephane Habett Roux
http://habett.org - http://habett.com
Crashed occident, we need another wall
------------------------------
Date: Thu, 12 Oct 2006 04:42:08 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Thu Oct 12 2006
Message-Id: <J70AE8.139M@zorch.sf-bay.org>
The following modules have recently been added to or updated in the
Comprehensive Perl Archive Network (CPAN). You can install them using the
instructions in the 'perlmodinstall' page included with your Perl
distribution.
Class-InsideOut-1.03
http://search.cpan.org/~dagolden/Class-InsideOut-1.03/
a safe, simple inside-out object construction kit
----
Devel-EnforceEncapsulation-0.50
http://search.cpan.org/~clotho/Devel-EnforceEncapsulation-0.50/
Find access violations to blessed objects
----
Drupal-Module-Starter-0.03
http://search.cpan.org/~smcnabb/Drupal-Module-Starter-0.03/
Create Drupal Module starter files
----
EekBoek-1.00.04
http://search.cpan.org/~jv/EekBoek-1.00.04/
Bookkeeping software for small and medium-size businesses
----
EekBoek-1.01.00
http://search.cpan.org/~jv/EekBoek-1.01.00/
Bookkeeping software for small and medium-size businesses
----
FLV-Info-0.16
http://search.cpan.org/~clotho/FLV-Info-0.16/
Extract metadata from Macromedia Flash Video files
----
Finance-Currency-Convert-XE-0.11
http://search.cpan.org/~barbie/Finance-Currency-Convert-XE-0.11/
Currency conversion module.
----
FrameNet-WordNet-Detour-0.99b
http://search.cpan.org/~reiter/FrameNet-WordNet-Detour-0.99b/
a WordNet to FrameNet Detour.
----
Google-Adwords-v0.4.0
http://search.cpan.org/~rohan/Google-Adwords-v0.4.0/
an interface which abstracts the Google Adwords SOAP API
----
IPA-1.03
http://search.cpan.org/~karasik/IPA-1.03/
Image Processing Algorithms
----
IPC-Cmd-0.30
http://search.cpan.org/~kane/IPC-Cmd-0.30/
finding and running system commands made easy
----
MIME-EncWords-0.01
http://search.cpan.org/~nezumi/MIME-EncWords-0.01/
deal with RFC-1522 encoded words (improved)
----
Net-IMAP-Simple-1.17
http://search.cpan.org/~cfaber/Net-IMAP-Simple-1.17/
Perl extension for simple IMAP account handling.
----
Net-Stomp-0.31
http://search.cpan.org/~lbrocard/Net-Stomp-0.31/
A Streaming Text Orientated Messaging Protocol Client
----
Object-InsideOut-2.08
http://search.cpan.org/~jdhedden/Object-InsideOut-2.08/
Comprehensive inside-out object support module
----
PAR-Dist-0.20
http://search.cpan.org/~smueller/PAR-Dist-0.20/
Create and manipulate PAR distributions
----
PAR-Repository-Client-0.13
http://search.cpan.org/~smueller/PAR-Repository-Client-0.13/
Access PAR repositories
----
PathTools-3.23
http://search.cpan.org/~kwilliams/PathTools-3.23/
----
Set-Partition-0.03
http://search.cpan.org/~dland/Set-Partition-0.03/
Enumerate all arrangements of a set in fixed subsets
----
Text-ASCIIMathML-0.1
http://search.cpan.org/~nodine/Text-ASCIIMathML-0.1/
Perl extension for parsing ASCIIMathML text into MathML
----
WWW-Scraper-ISBN-Amazon_Driver-0.06
http://search.cpan.org/~barbie/WWW-Scraper-ISBN-Amazon_Driver-0.06/
----
WWW-Scraper-ISBN-ORA_Driver-0.07
http://search.cpan.org/~barbie/WWW-Scraper-ISBN-ORA_Driver-0.07/
Search driver for O'Reilly & Associates's online catalog.
----
WebService-ISBNDB-0.30
http://search.cpan.org/~rjray/WebService-ISBNDB-0.30/
----
XML-OPML-LibXML-0.04
http://search.cpan.org/~miyagawa/XML-OPML-LibXML-0.04/
Parse OPML document with LibXML parser
----
o2sms-3.20
http://search.cpan.org/~mackers/o2sms-3.20/
A module to send SMS messages using the website of O2 Ireland
----
threads-1.44
http://search.cpan.org/~jdhedden/threads-1.44/
Perl interpreter-based threads
----
warnings-compat-0.02
http://search.cpan.org/~saper/warnings-compat-0.02/
warnings.pm emulation for pre-5.6 Perls
If you're an author of one of these modules, please submit a detailed
announcement to comp.lang.perl.announce, and we'll pass it along.
This message was generated by a Perl program described in my Linux
Magazine column, which can be found on-line (along with more than
200 other freely available past column articles) at
http://www.stonehenge.com/merlyn/LinuxMag/col82.html
print "Just another Perl hacker," # the original
--
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: 11 Oct 2006 23:22:39 -0700
From: "thedwig@gmail.com" <thedwig@gmail.com>
Subject: openGL-0.5 perl module problem
Message-Id: <1160634159.673426.48030@e3g2000cwe.googlegroups.com>
hi.
%tar -xvf OpenGL-0.5.tar.gz
%cd OpenGL-0.5
%perl Makefile.PL
and then i met messages.....
Note (probably harmless): No library found for -lGLUT
Note (probably harmless): No library found for -lGLX
Note (probably harmless): No library found for -lMesaGLU
Note (probably harmless): No library found for -lMesaGLUT
Note (probably harmless): No library found for -lMesaGLX
Note (probably harmless): No library found for -lXIE
how can i solve this problem? help...
------------------------------
Date: 11 Oct 2006 21:56:28 -0700
From: "EZP" <peretz.eyal@gmail.com>
Subject: Re: Running scripts on the Exceed
Message-Id: <1160628987.950622.252770@h48g2000cwc.googlegroups.com>
when i'm running the script (above) through my windows cmd, the window
is stuck.
------------------------------
Date: 11 Oct 2006 19:27:27 -0700
From: "romorris@bellsouth.net" <romorris@bellsouth.net>
Subject: Sorting and moving files to dir for DVD burn
Message-Id: <1160620047.726489.226130@i3g2000cwc.googlegroups.com>
Im sure someone done this, probally for MP3's, and knows how to do it
in such a simple fashion with perl, so I have to ask this:
I have a quite few files (~230), all different sizes ( 2megs~200megs )
all in one directory. All files are compressed(.Z).
What I want to do is somehow sort and move these into seperate
directories filling each as close to 4 gigs as possible. This way I can
burn these to DVD eaisily. I know there is software out there to do
this like "Burn To The Brim", but need to automate it by scripting.
I searched for hours, and I'm not to good at perl - So I was hoping
someone knows a simple way of doing this.
At first I was thinking mkisofs with -split-output but this only gives
me 1 gig .iso's ?
any ideas?
thanks!
-Rob
------------------------------
Date: 11 Oct 2006 19:27:31 -0700
From: wesphillips@gmail.com
Subject: Re: Standard output problem
Message-Id: <1160620051.295034.38500@b28g2000cwb.googlegroups.com>
On Oct 11, 6:42 pm, Jim Gibson <jgib...@mail.arc.nasa.gov> wrote:
> In article <1160598910.311902.207...@h48g2000cwc.googlegroups.com>,
>
>
>
>
>
> <wesphill...@gmail.com> wrote:
> > I have a perl script, it is very basic:
>
> > #!/usr/bin/perl -w
> > #test.pl
> > print "test\n";
>
> > The test.pl file is executable (permissions are 755). If I run this
> > script like this:
> > perl ./test.pl
>
> > I get the expected output, but if I run it like this:
>
> > ./test.pl
>
> > I don't get anything at all. I have induced errors into the script to
> > see if I get the error messages, but I still get nothing. If I run the
> > script with the errors by explicitly calling perl, I see the error
> > output like I expect to. I have a second script in the same directory
> > that DOES work when called directly, so I don't know what could be
> > wrong. I have also changed the first line so that it looks like this:
>
> > #!/usr/bin/perly -w
>
> > and I get the expected error from bash stating that it cannot find the
> > interpreter called "perly"
>
> > Any ideas?Two. 1) What does 'which perl' return? 2) Try changing the name to
> something other than test.pl. 'test' is a shell built-in, and although
> ./test.pl shouldn't be interpreted as the built-in, you never know (I
> have been burned a few times by building a program called 'test').
The output of "which perl" is /usr/bin/perl, so they match wha is on
the first line. I re-created the script and called it opt.pl, same
symptoms. One of my coworkers created a user account on the computer
and could run the script either way, so I am guessing that it might
have something to do with the environment variables, but I haven't
gotten much further.
>
> --
> Jim Gibson
>
> Posted Via Usenet.com Premium Usenet Newsgroup Services
> ----------------------------------------------------------
> ** SPEED ** RETENTION ** COMPLETION ** ANONYMITY **
> ----------------------------------------------------------
> http://www.usenet.com- Hide quoted text -- Show quoted text -
------------------------------
Date: 11 Oct 2006 19:30:19 -0700
From: wesphillips@gmail.com
Subject: Re: Standard output problem
Message-Id: <1160620219.145810.217440@e3g2000cwe.googlegroups.com>
On Oct 11, 4:39 pm, Michele Dondi <bik.m...@tiscalinet.it> wrote:
> On 11 Oct 2006 13:35:10 -0700, wesphill...@gmail.com wrote:
>
> >Subject: Standard output problemNo!
>
>
>
> >I have a perl script, it is very basic:
>
> >#!/usr/bin/perl -w
> >#test.pl
> >print "test\n";
> [snip]
> >#!/usr/bin/perly -w
>
> >and I get the expected error from bash stating that it cannot find the
> >interpreter called "perly"Indeed I had thought this may have been yet another instance of the
> dos vs *nix line endings issue, i.e. due to a spurious carriage
> return. But this seems not to be the case at least at a first test on
> Linux system:
>
> $ cat -A foo.pl
> #!/usr/bin/perl -w^M$
> ^M$
> print "test\n";^M$
> ^M$
> $ ./foo.pl
> test
>
That was a good guess, but I created the test.pl script on the computer
that is trying to run it, so I don't knwo how I could have induced the
dos style carriage returns, but I have seen stranger things appear in
linux...
> On your system things may actually be different.
>
> >Any ideas?Other than this... no, sorry!
>
> Michele
> --
> {$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
> (($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
> .'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
> 256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
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 9835
***************************************
