[29426] in Perl-Users-Digest
Perl-Users Digest, Issue: 670 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Jul 22 11:10:19 2007
Date: Sun, 22 Jul 2007 08:09:09 -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 Sun, 22 Jul 2007 Volume: 11 Number: 670
Today's topics:
@arts <zaxfuuq@invalid.net>
Re: @arts <tadmc@seesig.invalid>
Re: @arts <bik.mido@tiscalinet.it>
Re: @arts <jurgenex@hotmail.com>
Re: Math <blb8@po.cwru.edu>
Re: Math anno4000@radom.zrz.tu-berlin.de
mysql DB specific primary key <hpbenton@gmail.com>
Re: mysql DB specific primary key <tlviewer@VISTAyahoo.com>
Re: mysql DB specific primary key <hpbenton@gmail.com>
Re: mysql DB specific primary key <stoupa@practisoft.cz>
new CPAN modules on Sun Jul 22 2007 (Randal Schwartz)
Re: retrieving usenet messages III <bik.mido@tiscalinet.it>
Re: retrieving usenet messages III <bik.mido@tiscalinet.it>
Re: The Convenience of Online Learning. The Benefits of <tadmc@seesig.invalid>
Re: wors on active perl but not on unix <nobull67@gmail.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sun, 22 Jul 2007 00:03:42 -0700
From: "Wade Ward" <zaxfuuq@invalid.net>
Subject: @arts
Message-Id: <_PudnYF7Q5eySj_bnZ2dnUVZ_rmjnZ2d@comcast.com>
I'm picking apart the following script:
#!/usr/bin/perl
use strict;
use warnings;
use Net::NNTP;
use Date::Parse;
my $nsrv='newsgroups.comcast.net';
my $grp='comp.lang.perl.misc';
my $USER = '';
my $PASS = '';
my $nntp=Net::NNTP->new($nsrv) or die "Can't login to `$nsrv'$!\n";
$nntp->authinfo($USER,$PASS) or die $!;
my (undef, $first, $last, undef)=$nntp->group($grp)
or die "Can't access $grp\n";
my ($since, @arts)=time-10*60*60;
for (reverse $first..$last) {
my %hdr=map /^(\S[^:]+):\s(.*)$/g, @{$nntp->head($_)};
defined(my $date=$hdr{'NNTP-Posting-Date'}) or next;
defined(my $time=str2time $date)
or warn "Couldn't parse date for article $_ ($date)\n"
and next;
last if $time < $since;
unshift @arts, $_;
}
$nntp->article($_,\*STDOUT) for @arts;
__END__
The first symbol I don't understand is @arts. It looks like a special
variable to me, as I think $_ is as well. I find no reference for it in my
7-yr old version of Programming Perl. I looked for it as well at cpan's
date::parse and found nothing. What is @arts ?
--
Wade Ward
------------------------------
Date: Sat, 21 Jul 2007 23:23:54 -0500
From: Tad McClellan <tadmc@seesig.invalid>
Subject: Re: @arts
Message-Id: <slrnfa5muq.j6c.tadmc@tadmc30.sbcglobal.net>
Wade Ward <zaxfuuq@invalid.net> wrote:
> What is @arts ?
An array.
--
Tad McClellan
email: perl -le "print scalar reverse qq/moc.noitatibaher\100cmdat/"
------------------------------
Date: Sun, 22 Jul 2007 10:00:02 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: @arts
Message-Id: <nv26a3heo5i2sh7sviugtm58q552nhcqu8@4ax.com>
On Sun, 22 Jul 2007 00:03:42 -0700, "Wade Ward" <zaxfuuq@invalid.net>
wrote:
>Subject: @arts
Please, put the subject of your post in the Subject. Knowing who you
are I had guessed it had to do with some code posted earlier by
someone -actually me-. Reading further, if it actually were a special
variable, then the subject may have been moderately fine. Since it
isn't, and in any case just to be sure, you may have chosen something
like: "@arts: a special variable?"
> my ($since, @arts)=time-10*60*60;
^^^^^
1
> unshift @arts, $_;
^^^^^
2
> $nntp->article($_,\*STDOUT) for @arts;
^^^^^
3
>The first symbol I don't understand is @arts. It looks like a special
>variable to me, as I think $_ is as well. I find no reference for it in my
No, it isn't. *What* precisely led you to think that?
>7-yr old version of Programming Perl. I looked for it as well at cpan's
>date::parse and found nothing. What is @arts ?
It is a common lexical variable appearing in the script exactly in the
three statements above: the first one (1) is the declaration, so to
answer your question @arts is an array that starts as its life as an
empty one. Then (2) it gets increasingly filled in "reverse" order.
Last (3) it gets iterated over, period.
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: Sun, 22 Jul 2007 09:19:34 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: @arts
Message-Id: <GiFoi.2436$0v4.1803@trndny01>
Wade Ward wrote:
> The first symbol I don't understand is @arts. It looks like a special
Oh come on! Are you saying you have never seen an array before? How long
have you been programming Perl?
> variable to me, as I think $_ is as well.
Yes, $_ is special in so far as _many_ Perl functions will use it as the
default operand if you don't explicitely specify a different one.
> I find no reference for it
> in my 7-yr old version of Programming Perl.
My 11 year old copy of Programming Perl introduces arrays on page 6 and $_
on page 53.
jue
------------------------------
Date: Sun, 22 Jul 2007 04:01:18 +0000 (UTC)
From: Brian Blackmore <blb8@po.cwru.edu>
Subject: Re: Math
Message-Id: <f7ukqd$3f2$1@gnus01.u.washington.edu>
Robert Hicks <sigzero@gmail.com> wrote:
> On Jul 19, 11:46 pm, Brian Blackmore <b...@po.cwru.edu> wrote:
> > Michele Dondi <bik.m...@tiscalinet.it> wrote:
> > > On Thu, 19 Jul 2007 01:46:54 -0000, Robert Hicks <sigz...@gmail.com>
> > > >
> > > >I realize that any math in Perl is probably slower than the same math
> > > >in "C" but I was wondering if Perl was as accurate as "C" in math
> > > >computations. I don't see why it wouldn't be but I thought I would ask
> > > >as a heavy spherical math project is on the horizon.
> > >
> > > With the usual caveat about "many parameters to take into account",
> > > there shouldn't be a difference,...
> >
> > ...
> > have my own arbitrary precision stuff in perl and it's slow, but
> > that's okay because it is supposed to be slow (figure that one out).
> > On the other hand, my C matrix routines are faster than PARI.
> >
> > In my experience, perl is generally slower for heavy number crunching,
> > but it does well enough if only 25% of your code really has anything
> > to do with a bunch of numerical processing. If all that processing is
> > driving some other frontend, then it seems to fair pretty well.
> Basically it has to do with the positions of ships. We get emails from
> the ships that have lat/lon coordinates and we plot them. We also do
> stuff like figure out what ships are within SAR distance and what
> ports are close at hand for SAR operations. So spherical trig stuff
> comes into play. I don't think "fast" is a requirement as long as we
> can get the email, look up the last position, do calculations and then
> write back to the db. That is the basics of it.
I have code that effectively does half of this; alas, it's not ready
for release. Navigation has been a hobby for a while, and there's a
great deal of modelling involved for a couple of the projects I'm
working on. For what you've described, I would expect no particular
loss of speed nor of precision using perl. Because of the data
stream, it's probably better than C in this case.
If you were doing acoustic tomography or processing soundings for
topography, then you'd notice a big difference (whatever "big"
means) in speed. I've found it unfortunate for these applications
that I'm so used to perl that sometimes it takes more time to write
it in C/C++, but there's a line between coding time and processing
time that is eventually crossed and C is the way to go.
At that point, however, you're so deep in it that you might as well just
tie a concrete block to your feet and throw yourself in the river,
because you're never going to come back up.
> We currently have c libs with the math and a Perl/XS module that calls
> those routines. We are having a horrible time moving that code from PA-
> RISC to Itanium (the code is as old as IRIS and PRIME). So we may just
> move it all into the Perl realm to make it easier going forward.
I can't imagine anything in there being so complicated that it
couldn't be implemented in either C or Perl in a big hurry. Keep it
around for backup sake or following the MS philosophy that there is
no physical layer, or the Java philosophy that C isn't available on
enough machines so we'll just write JVM in C so Java is... and write
an emulator for PA-RISC on Itanium. :P
--
Brian Blackmore
blb8 at po dot cwru dot edu
------------------------------
Date: 22 Jul 2007 13:14:23 GMT
From: anno4000@radom.zrz.tu-berlin.de
Subject: Re: Math
Message-Id: <5gh3hfF3ghmvoU1@mid.dfncis.de>
Robert Hicks <sigzero@gmail.com> wrote in comp.lang.perl.misc:
[...]
> Basically it has to do with the positions of ships. We get emails from
[...]
> We currently have c libs with the math and a Perl/XS module that calls
> those routines. We are having a horrible time moving that code from PA-
> RISC to Itanium (the code is as old as IRIS and PRIME). So we may just
> move it all into the Perl realm to make it easier going forward.
That sounds like a plan. You can do a lot of trigonometry per received
mail message, even in Perl, speed won't be a problem. There's
"Geo::Distance - Calculate Distances and Closest Locations" on CPAN.
GIS::Distance seems to be the aspiring successor.
Anno
------------------------------
Date: Sun, 22 Jul 2007 06:29:14 -0000
From: pistachio <hpbenton@gmail.com>
Subject: mysql DB specific primary key
Message-Id: <1185085754.536793.53040@j4g2000prf.googlegroups.com>
Hello everyone,
Hopefully a quick one. I have a database in which I want to put some
data into from a file. I've parsed through the file got what I want
and am about to put it into the database. But I want to check the
primary key and see if it's free before I put the data in. The
database has gaps in the primary key sequence from deleting data, I
want to put data into those gaps. Is there a quick way to do this. I
was going to do some like :
1) Go through database see where no data for primary key
2) sort this number into an array
3) use array to specify empty database slots.
Any ideas would be great esp with some code. Or how to do the 1st line
(not /usr/bin/perl -w for the funny ppl out there :p).
Thanks
Paul
------------------------------
Date: 22 Jul 2007 07:57:03 GMT
From: Mark Pryor <tlviewer@VISTAyahoo.com>
Subject: Re: mysql DB specific primary key
Message-Id: <46a30dcf$0$30614$4c368faf@roadrunner.com>
On Sun, 22 Jul 2007 06:29:14 +0000, pistachio wrote:
> Hello everyone,
>
> Hopefully a quick one. I have a database in which I want to put some
> data into from a file. I've parsed through the file got what I want
> and am about to put it into the database. But I want to check the
> primary key and see if it's free before I put the data in.
You could have posted this question anywhere that MySQL is on topic.
If the primary key is flagged as "auto-increment" then the whole basis for
your script has vanished. In that case the value of the primary key is
meaningless to all except for the MySQL server itself. Even though you can
query for it and see gaps in its value, your obsession to fill those gaps
is at best not recommended and at worst a mild case of OCD.
> database has gaps in the primary key sequence from deleting data, I
> want to put data into those gaps. Is there a quick way to do this. I
> was going to do some like :
>
> 1) Go through database see where no data for primary key
> 2) sort this number into an array
> 3) use array to specify empty database slots.
You could export the data without the primary key, then start over with a
batch import after recreating the database.
In any case you could experiment to see which approach makes sense from
the CLI.
>
> Any ideas would be great esp with some code. Or how to do the 1st line
> (not /usr/bin/perl -w for the funny ppl out there :p).
>
use DBI;
--
Mark
------------------------------
Date: Sun, 22 Jul 2007 08:33:55 -0000
From: pistachio <hpbenton@gmail.com>
Subject: Re: mysql DB specific primary key
Message-Id: <1185093235.340214.244220@x40g2000prg.googlegroups.com>
> You could have posted this question anywhere that MySQL is on topic.
Yes I guess I could but I was looking for Perl help :D
> If the primary key is flagged as "auto-increment" then the whole basis for
> your script has vanished. In that case the value of the primary key is
> meaningless to all except for the MySQL server itself. Even though you can
> query for it and see gaps in its value, your obsession to fill those gaps
> is at best not recommended and at worst a mild case of OCD.
Actually it's not. The database is an online DB where the primary key
is used as a ref to the data. Hence I cannot reset it as you suggest,
nor is it an OCD type thing. I have a prim key of 15000 odd ppl think
there are 15000 piece's of info in the db, which isn't true. Before
you go and tell me that wasn't the way to make the DB, I wasn't the
one to make it, I'm just responsible for it. So thanks for the helpful
suggestion.
> > Any ideas would be great esp with some code. Or how to do the 1st line
> > (not /usr/bin/perl -w for the funny ppl out there :p).
>
> use DBI;
Umm funny. I was thinking more like the DBI select command with the
perl capture, something with the for loop and an array. Anyway for
your suggestion it should really be use strict; before use DBI;
Cheers,
Paul
------------------------------
Date: Sun, 22 Jul 2007 16:19:54 +0200
From: "Petr Vileta" <stoupa@practisoft.cz>
Subject: Re: mysql DB specific primary key
Message-Id: <f7vp4v$1o61$1@ns.felk.cvut.cz>
pistachio wrote:
> Hello everyone,
>
> Hopefully a quick one. I have a database in which I want to put some
> data into from a file. I've parsed through the file got what I want
> and am about to put it into the database. But I want to check the
> primary key and see if it's free before I put the data in. The
> database has gaps in the primary key sequence from deleting data, I
> want to put data into those gaps. Is there a quick way to do this. I
> was going to do some like :
>
> 1) Go through database see where no data for primary key
> 2) sort this number into an array
> 3) use array to specify empty database slots.
>
This look you don't want to use numeric autoincremented primary key but want
to use key like "forname, lastname".
In this case you can use MySQL syntax "INSERT IGNORE INTO table_name ...."
and in next step you can read insert command was be successed or not.
Here is the very simple example:
------ CUT -----
use strict;
use DBI;
#connect to MySQL server
my $database = 'test';
my $host = 'localhost';
my $dbuser = 'root';
my $dbpassword = '';
my $dbh = DBI->connect("DBI:mysql:$database:$host",$dbuser,$dbpassword)
or die "Can't connect: $DBI::errstr\n";
# create table 'students'
my $sth = $dbh->do("CREATE TABLE students (
forname varchar(100) NOT NULL default '',
lastname varchar(100) NOT NULL default '',
PRIMARY KEY (forname,lastname)) TYPE=MyISAM");
# some other Perl code
# data to insert
my $forname = 'John';
my $lastname = 'Doe';
# insert into table
$sth = $dbh->prepare("INSERT IGNORE INTO students
set forname='$forname', lastname='$lastname' ");
$sth->execute() or die $sth->errstr;
if($sth->rows == 0) # insert wasn't be successful
{
print "Duplicate primary key: $forname $lastname\n";
}
else
{
print "Data was be inserted\n";
}
# try to insert the same data again
$sth = $dbh->prepare("INSERT IGNORE INTO students
set forname='$forname', lastname='$lastname' ");
$sth->execute() or die $sth->errstr;
if($sth->rows == 0) # insert wasn't be successful
{
print "Duplicate primary key: $forname $lastname\n";
}
else
{
print "Data was be inserted\n";
}
$sth->finish;
$dbh->disconnect;
------ CUT -----
--
Petr Vileta, Czech republic
(My server rejects all messages from Yahoo and Hotmail. Send me your mail
from another non-spammer site please.)
------------------------------
Date: Sun, 22 Jul 2007 04:42:17 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Sun Jul 22 2007
Message-Id: <JLKD2H.GG3@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.
Archive-Tar-Wrapper-0.10
http://search.cpan.org/~mschilli/Archive-Tar-Wrapper-0.10/
API wrapper around the 'tar' utility
----
Catalyst-Plugin-Authentication-0.10002
http://search.cpan.org/~jayk/Catalyst-Plugin-Authentication-0.10002/
Infrastructure plugin for the Catalyst authentication framework.
----
Catalyst-Plugin-CRUD-0.20
http://search.cpan.org/~bayside/Catalyst-Plugin-CRUD-0.20/
CRUD (create/read/update/delete) Plugin for Catalyst
----
Catalyst-Plugin-Session-Store-Cache-0.01
http://search.cpan.org/~lbr/Catalyst-Plugin-Session-Store-Cache-0.01/
Store sessions using a Catalyst::Plugin::Cache
----
DBIx-MyParsePP-0.10
http://search.cpan.org/~philips/DBIx-MyParsePP-0.10/
Pure-perl SQL parser based on MySQL grammar and lexer
----
GRID-Machine-0.072
http://search.cpan.org/~casiano/GRID-Machine-0.072/
Remote Procedure Calls over a SSH link
----
Google-Data-JSON-0.1.0
http://search.cpan.org/~takeru/Google-Data-JSON-0.1.0/
General XML-JSON converter based on Google Data APIs
----
Google-Data-JSON-0.1.1
http://search.cpan.org/~takeru/Google-Data-JSON-0.1.1/
General XML-JSON converter based on Google Data APIs
----
Java-Javap-0.03
http://search.cpan.org/~philcrow/Java-Javap-0.03/
Java to Perl 6 API translator
----
MailTools-2.00_02
http://search.cpan.org/~markov/MailTools-2.00_02/
----
Module-ScanDeps-0.76
http://search.cpan.org/~smueller/Module-ScanDeps-0.76/
Recursively scan Perl code for dependencies
----
Net-BitTorrent-PeerPacket-1.1
http://search.cpan.org/~jmcada/Net-BitTorrent-PeerPacket-1.1/
Parse/Build Peer Packets from BitTorrent
----
Net-BitTorrent-PeerPacket-1.2
http://search.cpan.org/~jmcada/Net-BitTorrent-PeerPacket-1.2/
Parse/Build Peer Packets from BitTorrent
----
SOAP-WSDL-2.00_07
http://search.cpan.org/~mkutter/SOAP-WSDL-2.00_07/
SOAP with WSDL support
----
Text-Restructured-Writer-LibXML-0.01
http://search.cpan.org/~dakkar/Text-Restructured-Writer-LibXML-0.01/
----
WebService-30Boxes-API-1.02
http://search.cpan.org/~chitoiup/WebService-30Boxes-API-1.02/
Perl interface to the 30 Boxes API
----
WebService-30Boxes-API-1.03
http://search.cpan.org/~chitoiup/WebService-30Boxes-API-1.03/
Perl interface to the 30 Boxes API
----
WebService-30Boxes-API-1.04
http://search.cpan.org/~chitoiup/WebService-30Boxes-API-1.04/
Perl interface to the 30 Boxes API
----
WebService-30Boxes-API-1.05
http://search.cpan.org/~chitoiup/WebService-30Boxes-API-1.05/
Perl interface to the 30 Boxes API
----
WebService-Mogo2-0.01
http://search.cpan.org/~kazeburo/WebService-Mogo2-0.01/
Perl Interface to mogo2.jp
----
XML-Atom-Service-0.13.0
http://search.cpan.org/~takeru/XML-Atom-Service-0.13.0/
Atom Service Document object
----
XML-Atom-Service-0.13.1
http://search.cpan.org/~takeru/XML-Atom-Service-0.13.1/
Atom Service Document object
----
psh-1.8.1
http://search.cpan.org/~gregor/psh-1.8.1/
Perl SHell
----
reslog-3.09
http://search.cpan.org/~imacat/reslog-3.09/
Reverse-resolve IP in Apache log files
----
reslog-3.10
http://search.cpan.org/~imacat/reslog-3.10/
Reverse-resolve IP in Apache log files
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: Sun, 22 Jul 2007 09:32:43 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: retrieving usenet messages III
Message-Id: <7p16a3pjsjbdab598msgd50hp1rcdjmkcd@4ax.com>
On Sat, 21 Jul 2007 18:55:33 -0700, "merl the perl"
<zaxfuuq@invalid.net> wrote:
>> Mine doesn't use newnews() either. Whether you use my simple minded
>I think you want "simplistic" or simply "simple." Simple-minded is
>pejorative.
If it is, then it's not misplaced.
>That's the point. Perl's a little bit of a platypus on windows. With
>Solaris, I'll get C99, Fortran2003, and perl from the get-go. I'm not
>moving forward very quickly with the install because I've never run 2 OS's
>on the same machine.
Not really: it's true that unices tend to come complete of quite a lot
of programming languages out of the box. But when I had a new portable
pc with XP preinstalled, the first thing I did was going to AS's,
download the latest AP, and TADAA: I was done! Previously on my home
PC I had had for years a vastly obsolete W98 installation and a CRUX
Linux one, also *happily* using AP on the former, and the distro's
perl on the latter.
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: Sun, 22 Jul 2007 09:45:20 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: retrieving usenet messages III
Message-Id: <ne26a35l2e68lgl43lcpe5h5ihq06v1pda@4ax.com>
On Sat, 21 Jul 2007 19:04:53 -0700, "merl the perl"
<zaxfuuq@invalid.net> wrote:
>> : That was actually one of the reasons why I mentioned:
>> : http://www.xs4all.nl/~rvtol/perl/xover_clpm.pl
>That's a good reference for me. There's still a lot of the syntax I don't
>get but this is more immdeiate than the other program. Thanks.
It is with all evidence more well thought and more thoroughly
developed than some of the alternatives shown here. There is still
room for improvement: for example I see that authentication info is
simply commented out. One may want to issue the suitable method if
both relevant variables are defined, for example: this is left as an
exercise to you. Or you may want to pass parameters and options from
the command line... and so on.
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: Sat, 21 Jul 2007 22:44:10 -0500
From: Tad McClellan <tadmc@seesig.invalid>
Subject: Re: The Convenience of Online Learning. The Benefits of a Respected Degree.Try Ellis College for Free.
Message-Id: <slrnfa5kka.id2.tadmc@tadmc30.sbcglobal.net>
KU <kusarpi@gmail.com> wrote:
> Ellis College gives you the prestige of earning your Bachelor's Degree
> from a respected university
Ellis College is a spammer, like pornographers and con artists are spammers.
It is not a respected university any longer.
--
Tad McClellan
email: perl -le "print scalar reverse qq/moc.noitatibaher\100cmdat/"
------------------------------
Date: Sun, 22 Jul 2007 14:07:09 -0000
From: Brian McCauley <nobull67@gmail.com>
Subject: Re: wors on active perl but not on unix
Message-Id: <1185113229.961966.186830@d55g2000hsg.googlegroups.com>
On Jul 21, 1:44 pm, "Nospam" <nos...@home.com> wrote:
> I am wondering what would cause a code that works in activeperl to not work
> in nix particularly to the quote character i.e %22 same code in active perl
> get("..%22...%22"); works fine but run on a server gets nothing, is there a
> difference in the way perl on a unix server would interprete the quote
> character i.e %22 as opposed to active perl on a windows environment?
I can see no reason.
Please post a _minimal_ but _complete_ script to illustrate your
problem.
------------------------------
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 V11 Issue 670
**************************************
