[11010] in Perl-Users-Digest
Perl-Users Digest, Issue: 4609 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Jan 10 02:07:13 1999
Date: Sat, 9 Jan 99 23:00:19 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sat, 9 Jan 1999 Volume: 8 Number: 4609
Today's topics:
Re: "Email this page to a friend" script <khayu@shweinc.com>
Re: Beginner problem (Tad McClellan)
CONCLUSIVE PROOF: Jesus *is* King of the Jews ! ! <Use-Author-Address-Header@[127.1]>
Executing Perl Scripts from VB <bsumpter@msn.com.au>
Re: How can I compare two arrays? (Matthew Bafford)
Is it a good idea to rebless a reference? <benbean@yahoo.com>
Re: line-length limitations <rick.delaney@home.com>
Re: line-length limitations <framsing@unr.edu>
Re: Math parser (Ilya Zakharevich)
Re: Memory Leak? <bholzman@earthlink.net>
Re: Need Shopping Cart for web...Newbie dbrogdon@cartserv.com
Newbie Question - Matt's wwwboard <rich@#shore.net>
Re: Not bad page for newbies.... <khayu@shweinc.com>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 9 Jan 1999 23:25:54 -0500
From: "Khayu Nyein" <khayu@shweinc.com>
Subject: Re: "Email this page to a friend" script
Message-Id: <36982df4.0@news.inch.com>
Yes, someone has already written a cgi script for that function and made it
aavail as freeware. Go to the following url.
http://www.bignosebird.com/carchive/birdcast.shtml
Khayu
Christopher Schulte wrote in message
<369dbce8.258308513@news.schulte.org>...
>Does anyone know of a script that will allow a website user to:
>
>1) be viewing a specific html file
>2) click on a link that says "email this page to a friend"
>3) enter their address, the friend's, and possibly a message
>4) have the page be sent to the specified person, with a static
>message added to the end of the email
>
>news.com has this option, on their news stories. But I was curious if
>some kind of cgi system has been written to do this too?
>
>I have looked at various resource pages, but to no avail.
>
>Many thanks for any replies!
>
>--
>Christopher Schulte
>
>Replace usenet with chris to send mail.
>Mail sent to usenet@schulte.org
>will *never* get to me. I hate spam!
------------------------------
Date: Sat, 9 Jan 1999 21:42:04 -0600
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Beginner problem
Message-Id: <ci7977.ka2.ln@magna.metronet.com>
Jeff Schneider (jschneid@sienahts.edu) wrote:
: Doesn't your script also have to
: print "<HTML><HEAD>bla bla</HEAD><BODY> bla bla bla</BODY></HTML>"
No it doesn't.
: On Fri, 08 Jan 1999 15:15:08 +0800, Alex <ex5316@netvigator.com>
: wrote:
: >print "content-type: text/plain\n\n";
^^^^^
^^^^^
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Sat, 9 Jan 1999 22:25:24 -0800 (PST)
From: Anonymous <Use-Author-Address-Header@[127.1]>
Subject: CONCLUSIVE PROOF: Jesus *is* King of the Jews ! ! !
Message-Id: <9d67011e056fe264d800108eb1f00606@anonymous>
Here's absolutely irrefutable, scientifically-verifiable evidence that
plainly demonstrates Jesus the Nazarene called the Christ to be the
One and Only Messiah of the Hebrew Old Testament(TaNaKh). I discovered
these facts through very careful, exhaustive research and deduction by
comparing extant secular-historical evidences with the testimony which
was so faithfully recorded in the ancient Hebrew Canon, which necessarily
includes BOTH Old and New Covenant Scriptures.
Thanks again for reading,
Enjoy! :)
Before proceeding with this article, please note the following:
-All calculations are based on precision astronomical data.
-Ancient calendar records correlated with lunisolar phases.
-Location data preset to Jerusalem for all calculations
-All Jewish lunisolar calendar dates are kosher(formal)
-Precession epoch datum set for each date specified
* * *
Lord of the Sabbath -- A Closer Look
The "going forth of the commandment(Artaxerxes I[Longimanus])
to restore and to (re)build Jerusalem..."[Dan 9:25]:
Julian day: 1554766
Day of week: Thursday, September 19, 457 BC
Jewish calendar: 1 Tishri 3305(1st day of the 1st[regnal] month)
New Moon: 12:58:47 AM(JD 1554765.45749)
Phase: 0.1%, Phase angle: 175.68x
Az: 29:59:12; Alt: -45:47:25
RA: 11:32:40; Dec: 7:48:27
Ecliptic Lon: 170:36:51; Lat: 4:24:29
Galactic Lon: 323:56:44; Lat: 55:24:14
Rising: Sep 19, 457 BC; 5:26:07 AM
Transit: Sep 19, 457 BC; 11:56:50 AM
Setting: Sep 19, 457 BC; 6:19:57 PM
Notes: ref. Ezra 7:6-26, ibid; note also that
1 Tishri must not fall on Sun, Wed or Fri
Jesus born in Bethlehem w/"his star[rising]in the east":
Julian day: 1720551
Day of week: Monday, August 12, 3 BC
Jewish calendar: 3 Elul 3758(lunisolar)
New Moon: 12:44:01 AM(JD 1720549.44723)
Phase: 0.0%, Phase angle: 179.38x
Az: 21:07:02; Alt: -39:38:16
RA: 9:10:05; Dec: 15:56:28
Ecliptic Lon: 135:10:08; Lat: -0:32:36
Galactic Lon: 245:20:41; Lat: 55:37:20
Rising: Aug 11, 3 BC; 5:04:05 AM
Transit: Aug 11, 3 BC; 11:56:05 AM
Setting: Aug 11, 3 BC; 6:40:06 PM
Notes: Jupiter-Venus conjunction in Leo
Wise men(Magi) visit Herod(morning)/10-month old Jesus(sunset):
Julian day: 1720860
Day and Date: Tuesday, June 17, 2 BC
Jewish calendar: 17/18 Tammuz 3759(lunisolar)
New Moon: 2:50:24 PM(JD 1720845.03500)
Phase: 0.1%, Phase angle: 175.90x
Az: 276:04:25; Alt: 43:53:38
RA: 4:18:48; Dec: 25:28:02
Ecliptic Lon: 67:15:12; Lat: 3:46:00
Galactic Lon: 185:39:26; Lat: 6:20:12
Rising: Jun 2, 2 BC; 3:49:21 AM
Transit: Jun 2, 2 BC; 11:13:58 AM
Setting: Jun 2, 2 BC; 6:42:42 PM
*Full moon: 8:06:58 PM(JD 1720860.25484)
Phase: 99.9%, Phase angle: 3.84x
Az: 134:39:11; Alt: 13:45:53
RA: 17:29:03; Dec: -27:03:40
Ecliptic Lon: 263:06:02; Lat: -3:33:05
Galactic Lon: 13:57:33; Lat: -19:56:34
Rising: Jun 17, 2 BC; 6:36:53 PM
Transit: Jun 17, 2 BC; 11:35:11 PM
Setting: Jun 18, 2 BC; 4:34:01 AM
Notes: Jupiter-Venus conjunction in Leo
Caesar Augustus died:
Julian day: 1726402
Day and Date: Sunday, 19 August 14 AD
Jewish calendar: 5 Elul 3774(lunisolar)
Notes: Tiberius not yet Caesar
Tiberius made Caesar Imperator(Emperor):
Julian day: 1726431
Day and Date: Monday, September 17, 14 AD
Jewish calendar: 5 Tishri 3775(lunisolar)
New Moon: 5:54:43 AM(JD 1726426.66300)
Phase: 0.0%, Phase angle: 178.50x
Az: 87:39:23; Alt: 7:16:36
RA: 11:19:22; Dec: 5:48:28
Ecliptic Lon: 168:22:59; Lat: 1:16:10
Galactic Lon: 307:29:26; Lat: 57:37:38
Rising: Sep 13, 14 AD; 5:15:01 Am
Transit: Sep 13, 14 AD; 11:41:17 AM
Setting: Sep 13, 14 AD; 5:59:26 PM
Notes: Compare Jesus' baptism date[Luke 3:1]
New Moon[Heb. Molad] coincident with Vernal Equinox:
Julian day: 1730266
Day and Date: Sunday, March 18, 25 AD
Jewish calendar: 28 AdarI 3785 (1 Nisan delayed 2 days)
New Moon: 8:07:30 AM(JD 1730265.75521)
Phase: 0.0%, Phase angle: 177.94x
Az: 113:27:40; Alt: 26:56:03
RA: 23:48:07; Dec: -3:37:11
Ecliptic Lon: 355:49:28; Lat: -2:07:17
Galactic Lon: 139:26:24; Lat: -54:31:38
Rising: Mar 18, 25 AD; 5:49:08 AM
Transit: Mar 18, 25 AD; 11:53:14 AM
Setting: Mar 18, 25 AD; 6:03:43 PM
*Sun Rising: Mar 18, 25 AD; 5:43:52 AM
Transit: Mar 18, 25 AD; 11:42:47 AM
Setting: Mar 18, 25 AD; 5:42:10 PM
Notes: Thirteenth intercalary month(Adar II/Veadar)
added in years 2, 5, 7, 10, 13, 16, and 18
over the nineteen-year cycle in Jesus' day,
proving that 31 AD was not a leap year.
Jesus' 30th birthday:
Julian day: 1731155
Day and Date: Sunday, August 24, 27 AD
Jewish calendar: 3 Elul 3787(lunisolar)
New Moon: 2:09:28 PM(JD 1731151.00658)
Phase: 0.0%, Phase angle: 177.86x
Az: 254:17:20; Alt: 51:43:00
RA: 9:47:00; Dec: 15:42:50
Ecliptic Lon: 143:39:49; Lat: 2:03:30
Galactic Lon: 257:55:04; Lat: 61:00:22
Rising: Aug 20, 27 AD; 4:31:40 AM
Transit: Aug 20, 27 AD; 11:32:27 AM
Setting: Aug 20, 27 AD; 6:26:46 PM
Notes: Jewish calendar birthday, Jesus eligible
for priesthood.
Jesus baptized into ministry at river Jordan(14 regnal years + 1 day into "reign of
Tiberius Caesar", and 483 tropical years [@365.242199d/y] + 1 day from commandment):
Julian day: 1731180
Day and Date: Thursday, September 18, 27 AD
Jewish calendar: 1 Tishri 3788(Day of Trumpets)
New Moon: 12:12:23 AM(JD 1731180.42526)
Phase: 0.1%, Phase angle: 176.18x
Rising: Sep 19, 27 AD; 5:32:29 AM
Transit: Sep 19, 27 AD; 11:58:55 AM
Setting: Sep 19, 27 AD; 6:18:05 PM
Az: 14:40:42; Alt: -51:00:41
RA: 11:42:07; Dec: 6:11:54
Ecliptic Lon: 173:25:04; Lat: 3:52:59
Galactic Lon: 317:44:29; Lat: 57:22:53
Notes: Daniel's 7+62 sabbatic years fulfilled[Dan 9:25]
Vernal(Spring) Equinox of 31 AD:
Julian day: 1732454
Day and Date: Monday, March 19, 31 AD
Jewish calendar: 5 Nisan 3791(lunisolar)
Sun Rising: Mar 19, 31 AD; 5:43:10 AM
Transit: Mar 19, 31 AD; 11:42:36 AM
Setting: Mar 19, 31 AD; 5:42:30 PM
Notes: Jewish lunisolar calendar rules stipulate
Passover(14 Nisan) must occur no earlier
than two days before the spring equinox.
Josephus said Passover fell "in Aries"
[ref. Antiquities of the Jews IIIx5],
placing Nisan 14 after March 21 every year
from Moses to Christ. Also, Pentecost must
occur before summer, and always on a Monday,
on the 7th/9th/11th or 13th of 3rd month(Sivan),
proving 14 Nisan 3791 fell on March 28, 31 AD.
Palm "Sunday"(1283 days after His baptism, the LORD of the Sabbath rides humbly
into Jerusalem in "the midst" of the prophet Daniel's seventieth sabbatic year):
Julian day: 1732463
Day and Date: Saturday, March 24, 31 AD
Jewish calendar: 10 Nisan 3791(lunisolar)
New Moon: 2:37:22 AM(JD 1732450.52594)
Phase: 0.2%, Phase angle: 175.34x
Az: 67:41:09; Alt: -45:35:21
RA: 23:27:51; Dec: -8:38:58
Ecliptic Lon: 349:11:07; Lat: -4:42:49
Galactic Lon: 131:38:56; Lat: -60:23:10
Rising: Mar 12, 31 AD; 6:17:11 AM
Transit: Mar 12, 31 AD; 12:08:49 PM
Setting: Mar 12, 31 AD; 6:07:58 PM
Notes: paschal lamb selected[Exo 12:3]
Date Jesus was crucified(Passover, Messiah the Prince "cut off"):
Julian day: 1732467
Day and Date: Wednesday, March 28, 31 AD
Jewish calendar: 14 Nisan 3791(lunisolar)
Full Moon: 3:14:08 PM(JD 1732466.05148)
Rising: Mar 27, 31 AD; 5:32:32 AM
Transit: Mar 27, 31 AD; 11:39:39 AM
Setting: Mar 27, 31 AD; 5:47:14 PM
Phase: 100.0%, Phase angle: 0.00x
Az: 250:10:44; Alt: 31:09:39
RA: 0:14:55; Dec: 1:29:02
Ecliptic Lon: 4:00:37; Lat: -0:08:17
Galactic Lon: 147:25:18; Lat: -47:50:31
Notes: orthodox theologians reject Wednesday crucifixion,
even though the Scriptures entirely support this.
Date Jesus resurrected(scientifically-inexplicable image produced on
fine linen shroud and swath cloth by process unknown and unidentified):
Julian day: 1732470
Day and Date: Saturday, March 31, 31 AD
Jewish calendar: 17 Nisan 3791(lunisolar)
Notes: Turin shroud proven from in 1st-century Jerusalem
Date Jesus' resurrection discovered("first day", early morning hours. Interesting
that "April Fools/All Fools Day" traditions are of Roman Catholic/Nicaean origin):
Julian day: 1732471
Day and Date: Sunday, April 1, 31 AD
Jewish calendar: 18 Nisan 3791(lunisolar)
Notes: orthodox theologians reject Saturday resurrection,
even though the Scriptures entirely support this.
Date daily sacrifice[Gk. endelecismds] ceased, temple destroyed:
Julian day: 1746832
Day and Date: Tuesday, July 17, 70 AD
Jewish calendar: 20 Tammuz 3830(lunisolar)
New Moon: 9:04:23 PM(JD 1746802.29471)
Phase: 0.2%, Phase angle: 175.53x
Az: 325:58:46; Alt: -21:06:02
RA: 6:06:19; Dec: 27:53:04
Ecliptic Lon: 91:23:53; Lat: 4:12:16
Galactic Lon: 197:25:33; Lat: 26:32:01
Rising: Jun 26, 70 AD; 3:28:11 AM
Transit: Jun 26, 70 AD; 11:05:03 AM
Setting: Jun 26, 70 AD; 6:43:34 PM
*Full Moon: 5:09:41 AM(JD 1746817.63172)
Phase: 99.8%, Phase angle: 5.48x
Az: 243:02:19; Alt: -9:43:09
RA: 19:11:10; Dec: -27:57:21
Ecliptic Lon: 285:43:33; Lat: -5:14:38
Galactic Lon: 25:38:09; Lat: -39:05:42
Rising: Jul 11, 70 AD; 6:32:06 PM
Transit: Jul 11, 70 AD; 11:24:36 PM
Setting: Jul 12, 70 AD; 4:19:14 AM
Notes: "sacrifice...to cease"[Dan 9:27] fulfilled
Date Jerusalem destroyed(observed, the city was "razed flat")
Julian day: 1746876
Day and Date: Saturday, September 8, 70 AD
Jewish calendar: 14 Elul 3830
Full Moon: 5:33:27 AM(JD 1746876.64823)
Phase: 100.0%, Phase angle: 1.83x
Az: 263:29:00; Alt: -5:08:23
RA: 22:59:53; Dec: -8:14:14
Ecliptic Lon: 342:58:54; Lat: -1:36:37
Galactic Lon: 116:37:17; Lat: -60:16:30
Rising: Sep 8, 70 AD; 5:38:11 PM
Transit: Sep 8, 70 AD; 11:21:03 PM
Setting: Sep 9, 70 AD; 5:12:02 AM
Notes: "desolate...consummation"[Dan 9:27] fulfilled
------------------------------
Date: Sun, 10 Jan 1999 16:08:34 +1100
From: "Barry G. Sumpter" <bsumpter@msn.com.au>
Subject: Executing Perl Scripts from VB
Message-Id: <779cfd$du4$1@m2.c2.telstra-mm.net.au>
This is a multi-part message in MIME format.
------=_NextPart_000_0005_01BE3CB3.798BA500
Content-Type: text/plain;
charset="windows-1252"
Content-Transfer-Encoding: quoted-printable
Does anyone nkow of a way to execute Perl from VB?
------=_NextPart_000_0005_01BE3CB3.798BA500
Content-Type: text/html;
charset="windows-1252"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD>
<META content=3Dtext/html;charset=3Diso-8859-1 =
http-equiv=3DContent-Type>
<META content=3D'"MSHTML 4.72.3110.7"' name=3DGENERATOR>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT color=3D#000000 size=3D2>Does anyone nkow of a way to execute =
Perl from=20
VB?</FONT></DIV></BODY></HTML>
------=_NextPart_000_0005_01BE3CB3.798BA500--
------------------------------
Date: Sat, 9 Jan 1999 22:08:19 -0500
From: dragons@scescape.net (Matthew Bafford)
Subject: Re: How can I compare two arrays?
Message-Id: <MPG.1101e3b03f50d8f98977c@news.scescape.net>
In article <36980967.32296180@news.phnx.uswest.net>, cgi@higherlove.com
pounded in the following:
=> I've been cracking the books and poring over code trying to figure
=> this out, but I can't find ANYTHING!
=>
=> If I have two arrays
=>
=> @a which consists of the words "here", "i", and "am"
=> @b which consists of the words "do", "i", and "too"
=>
=> How can I run some type of "for each" routine that compares each item
=> in @a to each item in @b and then exit when a match is found?
Your question is ambiguous. Do you want to $a[0] to $b[0], $b[1], and
$b[2], or do you want to compare $a[0] to $b[0], etc.? Allan Due covered
the second case, so I'll take the first.
The trick is to nest your loops:
for my $a ( @a ) {
for my $b ( @b ) {
print "Found a match\n" if $a eq $b;
}
}
Or, if you want to know where the matches are, you need to keep track of
where you are:
for ( my $a = 0; $a < @a; $a++ ) {
for ( my $b = 0; $b < @a; $b++ ) {
print "\$a[$a] is equal to \$b[$b]\n" if $a[$a] eq $b[$b];
}
}
Of course you would want to choose better variable names than that... :)
=> Thanks!
Hope This Help(s|ed)!
=> Lisa
--Matthew
------------------------------
Date: Sun, 10 Jan 1999 03:02:27 GMT
From: Benjamin Smith <benbean@yahoo.com>
Subject: Is it a good idea to rebless a reference?
Message-Id: <36981842.AC0D8B79@yahoo.com>
Hi,
I'm trying to store a list of objects I've created (I'm using the
Class::Struct module rather than creating my own objects). I create
objects on the fly in a loop and store the references in a list. When it
comes time to print out the list the references have forgotten which
class they belong to and consequently I can't call any methods on them.
I can get around this by blessing them to the class they should belong
to as I pull them off the list, but this strikes me as probably not a
good idea. What's the better solution?
Thanks!
=============================================
while (<>)
{
if (/some reg. ex./)
{
my $object = MyObject->new();
$object->name($1);
$object->data($2);
push(@object_list, $object);
}
}
my $object;
foreach $object (@folder_list)
{
print "Name: ", $object->name, "\n";
print "Data: ", $object->data, "\n";
}
=============================================
------------------------------
Date: Sun, 10 Jan 1999 03:39:48 GMT
From: Rick Delaney <rick.delaney@home.com>
Subject: Re: line-length limitations
Message-Id: <369822D2.9288681F@home.com>
[posted & mailed]
Fred Ramsing wrote:
>
> I think part of the problem is that "split" doesn't split the whole
> line, but only the first few hundred numbers with the last element in
> the array containing the rest of the line.
Perl does not have such a limitation, like awk. Perhaps you could post
the bit of code that is giving you trouble and any error messages you're
getting.
--
Rick Delaney
rick.delaney@shaw.wave.ca
------------------------------
Date: Sat, 9 Jan 1999 21:59:56 -0800
From: Fred Ramsing <framsing@unr.edu>
To: Rick Delaney <rick.delaney@home.com>
Subject: Re: line-length limitations
Message-Id: <Pine.GSO.3.96.990109215142.24756B-100000@equinox>
Whoops,
I was doing a bunch of stuff wrong: 1) not "chomp"ing the STDIN; 2) not
repeating the packformat for the line ("f" instead of "f*"); and 3)
assigning the result of the pack function to an array instead of a scalar.
The following works.
while (<INPUT>) {
chomp $_;
@line = split (/ |\t/ );
$newline = pack("f*", @line);
print OUTPUT "$newline";
}
Thanks for the reply,
Fred
On Sat, 9 Jan 1999, Rick Delaney wrote:
> [posted & mailed]
>
> Fred Ramsing wrote:
> >
> > I think part of the problem is that "split" doesn't split the whole
> > line, but only the first few hundred numbers with the last element in
> > the array containing the rest of the line.
>
> Perl does not have such a limitation, like awk. Perhaps you could post
> the bit of code that is giving you trouble and any error messages you're
> getting.
>
> --
> Rick Delaney
> rick.delaney@shaw.wave.ca
>
------------------------------
Date: 10 Jan 1999 06:18:17 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Math parser
Message-Id: <779gn9$nul$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Andrew Johnson
<ajohnson@gatewest.net>],
who wrote in article <36980E7E.3042F566@gatewest.net>:
> yes the PDL modules will allow what you want... here's your
> example running in the perldl shell (interactive PDL shell):
>
> perldl> $A = pdl [ [1,2,3], [3,4,6], [1,2,3] ]
>
> perldl> $B = pdl [ [3,2,3], [3,2,6], [5,7,8] ]
>
> perldl> $d = 5;
>
> perldl> $C = $A x $B * $d
>
> perldl> print $C
>
> [
> [120 135 195]
> [255 280 405]
> [120 135 195]
> ]
Same using
perl -MMath::Pari -de0
DB<1> $A = PARImat [ [1,2,3], [3,4,6], [1,2,3] ]
DB<2> $B = PARImat [ [3,2,3], [3,2,6], [5,7,8] ]
DB<3> print $A * $B * 5
[60,75,170;100,130,270;150,195,405]
Different result is due to to a difference of what is a column and
what is a row:
DB<14> $A = PARImat_tr [ [1,2,3], [3,4,6], [1,2,3] ]
DB<15> $B = PARImat_tr [ [3,2,3], [3,2,6], [5,7,8] ]
DB<16> print $A * $B * 5
[120,135,195;255,280,405;120,135,195]
For "table" format:
DB<17> use Math::Pari 'pari_pprint'
DB<18> print pari_pprint $A * $B * 5
[120 135 195]
[255 280 405]
[120 135 195]
Hope this helps,
Ilya
------------------------------
Date: Sat, 09 Jan 1999 12:59:48 -0500
From: Benjamin Holzman <bholzman@earthlink.net>
Subject: Re: Memory Leak?
Message-Id: <36979914.2174A52A@earthlink.net>
[courtesy cc to author]
> $buf # Buffer for data read from disk.
> while ( read( INFILE, $buffer, 1024 ) )
This could be a problem.
------------------------------
Date: Sun, 10 Jan 1999 03:51:07 GMT
From: dbrogdon@cartserv.com
Subject: Re: Need Shopping Cart for web...Newbie
Message-Id: <77983b$i5h$1@nnrp1.dejanews.com>
Check out http://www.cartserv.com. It's not written in Perl (in PHP3 actually
which is very similar to Perl) but it's free.
-Darrell
In article <3689c1f9.21520417@news.usit.net>,
jdriller@usit.net wrote:
> I know practically nothing about Perl. (MIS background) I need a
> shopping cart program. Have heard of PerlShop and Mini Vend, but I
> need help. Anyone used these? How do I get started? What do I need?
> Any help greatly appreciated!!!!
>
> Jen @ www.bellboytech.com
>
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Sat, 9 Jan 1999 22:42:02 -0500
From: "Rich Snow" <rich@#shore.net>
Subject: Newbie Question - Matt's wwwboard
Message-Id: <7pVl2.287$Yi3.47406@news.shore.net>
Hi Folks,
I've downloaded and set up Matt's wwwboard PERL script.
http://www.worldwidemart.com/scripts/
Trying to get this up and running.
The problem I am having is that when I enter data in the
html form and submit; the perl script returns the error message
"You forgot to fill in the 'Name' field in your posting".
I can muck with the PERL code in wwwboard.pl - so I know
I'm not just pulling cached pages down. I guess I can't tell
why the form data isn't making it to the script.
The setup strings appear to be correct -
Any pointers would be gladly accepted!
TIA,
-Rich
Remove # in email to respond directly
------------------------------
Date: Sat, 9 Jan 1999 23:32:49 -0500
From: "Khayu Nyein" <khayu@shweinc.com>
Subject: Re: Not bad page for newbies....
Message-Id: <36982f90.0@news.inch.com>
>http://eris.discordia.ch/~kistler/perl/intro.html and here:
>http://www.vis.inf.ethz.ch/~kistler/perl/intro.html
I'm wondering if there are other resources (for newbies) similar to this one
but covering other areas, like more on dealing with flat text file databases
and manipulating arrays (next number of matches, hashes, search, making html
pages dynamically, etc.) The following page is pretty good. I've been
hacking different codes and combining them into one for my own use for a
while, and this page really helped explain the stuff that i've been using.
Any other resources? Or is http://www.perl.com pretty much everything when
it comes to perl docs.
------------------------------
Date: 12 Dec 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
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.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
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 V8 Issue 4609
**************************************
