[16129] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 3541 Volume: 9

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Jul 3 00:05:30 2000

Date: Sun, 2 Jul 2000 21:05:08 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <962597108-v9-i3541@ruby.oce.orst.edu>
Content-Type: text

Perl-Users Digest           Sun, 2 Jul 2000     Volume: 9 Number: 3541

Today's topics:
        ** Apology ** <Magic@mattnet.freeserve.co.uk>
    Re: ** Apology ** <tony_curtis32@yahoo.com>
        ANNOUNCE: database version 0.90 alpha <jdb@wcoil.com>
    Re: bit strings for perms <jeffp@crusoe.net>
        can you fake a cookie? <jjk@onlink.netonlink.net>
    Re: can you fake a cookie? <jjk@onlink.netonlink.net>
    Re: can you fake a cookie? (Neil Kandalgaonkar)
    Re: Can't get Blat working on NT server <paul_work@yahoo.com>
        CGI and cookies snakedjip@my-deja.com
    Re: delete array (Tad McClellan)
        Find out if ran from a shtml? <matti@keller.com>
    Re: finding, checking, replacing <sales@aus-etrade.com>
        How to open redirect and open new browser at same time? <chenshaohong@sim.edu.sg>
    Re: Message board software <philipc@i-cable.com>
    Re: Need regexp pattern to verify a password is strong <bet@rahul.net>
        Perl Object Oriented Persistance (The POOP Group) <stupid@pobox.com>
    Re: Redirecting output to file <care227@attglobal.net>
    Re: symbolic links and $PWD riglerej@my-deja.com
        the whole problem <star@sonic.net>
    Re: the whole problem <tony_curtis32@yahoo.com>
    Re: Welcome to.... <Magic@mattnet.freeserve.co.uk>
    Re: Welcome to.... <billy@erc.msstate.edu>
    Re: Welcome to.... <billy@erc.msstate.edu>
    Re: Welcome to.... <billy@erc.msstate.edu>
        XML Modules <julius_mong@hotmail.com>
    Re: XML Modules (Clinton A. Pierce)
    Re: XML Modules (Neil Kandalgaonkar)
    Re: XML Modules (Neil Kandalgaonkar)
        Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: Sun, 02 Jul 2000 23:11:24 +0100
From: Magic <Magic@mattnet.freeserve.co.uk>
Subject: ** Apology **
Message-Id: <qcfvls0rpf9peg8jgpv498hvu25qc166cc@4ax.com>

I would like to take a moment to apologise to members of this group
for my recent posting. I realise I over-reacted somewhat. I was, and
still am to some degree, annoyed about the attempts to get me to erase
large chunks of data from my web server.

I hope you will accept my apology.



Magic        ==|:o)
-- 
Location : Portsmouth, England, UK
Homepage : http://www.mattnet.freeserve.co.uk
EMail : mailto:Magic@mattnet.freeserve.co.uk


------------------------------

Date: 02 Jul 2000 17:25:43 -0500
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: ** Apology **
Message-Id: <87ya3k1860.fsf@limey.hpcc.uh.edu>

>> On Sun, 02 Jul 2000 23:11:24 +0100,
>> Magic <Magic@mattnet.freeserve.co.uk> said:

> I would like to take a moment to apologise to members of
> this group for my recent posting. I realise I
> over-reacted somewhat. I was, and still am to some
> degree, annoyed about the attempts to get me to erase
> large chunks of data from my web server.

Looking back on deja, the original reference to "rm -rf"
was from Randal

<URI:http://x75.deja.com/=gh/[ST_rn=ps]/getdoc.xp?AN=640407358&search=thread&CONTEXT=962576298.1892941920&HIT_CONTEXT=962576298.1892941920&HIT_NUM=7&hitnum=3>

who explicitly included it as an example of nasty things
people could do to bad security-weak code.

> I hope you will accept my apology.

Sure.  People who post here as trolls and/or act
inconsiderately do the same thing to this community as
they do to communities and groups in the real world.

We disagree but we can do it with respect.  You get out of
USENET what you put in.

hth
t
-- 
"With $10,000, we'd be millionaires!"
                                           Homer Simpson


------------------------------

Date: 3 Jul 2000 02:59:35 GMT
From: "Josiah Bryan" <jdb@wcoil.com>
Subject: ANNOUNCE: database version 0.90 alpha
Message-Id: <8jovin$2hi$0@206.230.71.29>

Announcing:
        database version 0.90 alpha.

This is the first public release of the database package.
Comments and criticism are welcome and desired.

SYNOPSIS

     use database;
     tie(%db, 'database', 'test');

     $db{'field'}='value';

     $db{_}='/some/other/table/';

     $db{'field'}='value2';


DESCRIPTION


        The database package is meant to be a scalable, yet simple, method
        for quick and easy persistant data storage that is easy to implement
        using tied hashes.

        The database package brings back the simplicity and ease-of-use of
        the dbm-like implementations with several added features. With the
        database package, you can have multiple tables in one file. Database
        also supports integration the Tie::Multidim package internally,
allowing
        usage of the Tie::Multidim interface with database hashes. The
database
        package is also ideal for working with larger databases where
flat-file
        database solutions not be feasable because of load time, yet you
might
        not want to move to a full-scale datbase server like MySQL. The
       database package optimizes load time by only loading a table from
       disk when it is actually requested, whether that request be select
the
        table with a $db{_}="/table/" or by storing to fetching from it with
the
        Tie::Multidim package, or with any FETCH or STORE operation. The
        table is only loaded once, then it is catched in memory for the next
call
        to that table. In addition, only the tables that have been STOREd to
are
        written out to disk at DESTROY or if autoflush is on.



REQUIRED MODULES

   No further modules are necessary.


This module resides at:

    http://www.josiah.countystart.com/modules/database/


Contact: Josiah Bryan <josiah@josiah.countystart.com>

--
Josiah Bryan
VP of Product Development
TDCJ, Inc.
"Anything is possible."

vp@tdcj.com
http://www.josiah.countystart.com/

Tel: 937.316.6256













--
Josiah Bryan
VP of Product Development
TDCJ, Inc.
"Anything is possible."

vp@tdcj.com
http://www.josiah.countystart.com/

Tel: 937.316.6256





------------------------------

Date: Sun, 2 Jul 2000 23:23:09 -0400
From: Jeff Pinyan <jeffp@crusoe.net>
Subject: Re: bit strings for perms
Message-Id: <Pine.GSO.4.21.0007022322070.7544-100000@crusoe.crusoe.net>

[posted & mailed]

On Jul 2, Neil Kandalgaonkar said:

>-rwxrw-r--    some_file
>
>chmod 0b_111_110_100 => "some_file";    # perl 5.6
>
>I know I could have used this when I was learning perms. Of course
>we already have Jeff Pinyan's File::chmod, so this is not so useful.

I do think compile-time binary->decimal conversion took a while to work
its way into Perl, but it is quite cool.  Oh, and thanks. :)  I liked
writing that File::chmod module.  It seems helpful. :)

-- 
Jeff "japhy" Pinyan     japhy@pobox.com     http://www.pobox.com/~japhy/
PerlMonth - An Online Perl Magazine            http://www.perlmonth.com/
The Perl Archive - Articles, Forums, etc.    http://www.perlarchive.com/
CPAN - #1 Perl Resource  (my id:  PINYAN)        http://search.cpan.org/



------------------------------

Date: Sun, 2 Jul 2000 17:42:12 -0400
From: "Jonah" <jjk@onlink.netonlink.net>
Subject: can you fake a cookie?
Message-Id: <8jojlt$9te$1@onlink3.onlink.net>

Let's say I"m using a cookie to check if the right person
is using a private script on their own server, ie the webmaster
only.

Can some outside person who has access to the source code
just create the same cookie on their HD and then get in that way?

I've been reading about how http_referer is a bad way to authenticate,
well so is cookies if they too can be created (which I think they can).

What's the best way to keep crackers out of private scripts?

I understand any yahoo can pipe in form values using LWP or
whatever, so what can be done?

Anybody has the source code so they'll know what form values
to use, the only obstacle is that they won't know
where the script is located on the server.

thanks for your help







------------------------------

Date: Sun, 2 Jul 2000 17:53:30 -0400
From: "Jonah" <jjk@onlink.netonlink.net>
Subject: Re: can you fake a cookie?
Message-Id: <8jokge$8k2$1@onlink3.onlink.net>

oops, that's a cgi question

and I just answered my own question,  cookies are easy to
fake.

sorry




------------------------------

Date: Mon, 03 Jul 2000 03:08:38 GMT
From: neil@brevity.org (Neil Kandalgaonkar)
Subject: Re: can you fake a cookie?
Message-Id: <8jovn7$3d8$1@localhost.localdomain>

In article <8jokge$8k2$1@onlink3.onlink.net>,
Jonah <jjk@onlink.netonlink.net> wrote:
>oops, that's a cgi question
>

Yup, this is not really a perl question.


>and I just answered my own question,  cookies are easy to
>fake.

However this is not totally correct. You can send a cookie which 
is not easy to fake, for very large values of not easy. It involves
digitally signing the data, or more simply, applying a hash algorithm
plus a 'secret' string.

This technique and variations are described in detail in the book 
Apache Modules with Perl and C, by Lincoln Stein & Doug MacEachern, 
from O'Reilly. And probably any other good book on web security.

I'm not going to try to whip up a sample script because it's easy 
to get this wrong. :)

 ...And you should also understand it before trying it. Get a book 
or find a good reference on the web.

-- 
Neil Kandalgaonkar <neil@brevity.org>


------------------------------

Date: Sun, 02 Jul 2000 23:37:10 GMT
From: Paul Baker <paul_work@yahoo.com>
Subject: Re: Can't get Blat working on NT server
Message-Id: <8jojn5$fk6$1@nnrp1.deja.com>

In article <8jnmpl$chd$1@orpheus.gellyfish.com>,
  Jonathan Stowe <gellyfish@gellyfish.com> wrote:
> Does 'blat' work from the command line with the arguments you are
using ?
>

Many thanks for helping me out Jonathan.

I have now just got to the bottom of my problem.  It was actually an
incorrect path to the text file I was trying to send.  :-(  Blat was
failing because it couldn't find the file.

I have now corrected the script and the text version on the site, as
detailed in my original message.

Thanks again.

 - --
*  Paul                               paul_work@yahoo.com  *
*  Maidenhead.net              http://www.maidenhead.net/  *
*  ClockTowerWeb Ltd      http://www.clocktowerweb.co.uk/  *


Sent via Deja.com http://www.deja.com/
Before you buy.


------------------------------

Date: Mon, 03 Jul 2000 01:09:03 GMT
From: snakedjip@my-deja.com
Subject: CGI and cookies
Message-Id: <8jop38$j20$1@nnrp1.deja.com>

I'm experiencing some weird behavior, and i'm looking for ideas to
guide me...

I have a web site.  I use cookies to check if a user is logged in or
not.

In development (on my PC) AND in production (at my hosting service), I
have no problem with this setup using my PC as the browser, whether it
be with Netscape or IE.  Cookies are being set, users are being
recognized (I turned prompts on for cookies in the browsers).

When I go to my friend's PC, the cookies are simply not set.  He had
only IE installed, it didn't work, so I installed Netscape, turned on
the cookie prompts, and NOTHING.

I went to another site that uses cookies, and those sites worked fine
on his PC.

By the way, he's on ADSL, and his ISP uses some kind of proxy to limit
bandwidth consumption.  Could this be the reason ???????

Here's my code.  This peace of code is run after the user has clicked
on submit in the login form, and redirects to the user's profile page.

If anyone has a clue, PLEASE RESPOND :-)

Thanks.



my $userCookie = $cgi->cookie(-name => 'user',
			  -value => $user,
			  -path => '/',
			  -domain => '<the domain>',
			  -secure => 0);
my $loggedInCookie = $cgi->cookie(-name => 'loggedin',
			      -value => 1,
			      -path => '/',
			      -domain => '<the domain>',
			      -secure => 0,
			      -expires => '+3h');
print $cgi->redirect(-uri=>$redirUrl, -cookie=>
$userCookie,$loggedInCookie]);





Sent via Deja.com http://www.deja.com/
Before you buy.


------------------------------

Date: Sun, 2 Jul 2000 17:32:37 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: delete array
Message-Id: <slrn8lvd7l.b0q.tadmc@magna.metronet.com>

On Sun, 02 Jul 2000 19:57:51 GMT, James Fisher <jfisher@epotec.com> wrote:

>To delete an array....
>
>@myArray = ();


That does not delete an array (but it does allow perl to reuse
most of the memory it had).

A "deleted" array and an "empty" array are not the same thing.


The Right Way to delete an array is to arrange for it to
go out of scope.


-- 
    Tad McClellan                          SGML Consulting
    tadmc@metronet.com                     Perl programming
    Fort Worth, Texas


------------------------------

Date: Mon, 03 Jul 2000 01:23:33 +0200
From: Matthias Keller <matti@keller.com>
Subject: Find out if ran from a shtml?
Message-Id: <395FCEF5.A1F76276@keller.com>

Hi

Is it possible to find out in a perl-script wether it has been run over
its name or from a shtml ?

Thanks

Matt



------------------------------

Date: Mon, 03 Jul 2000 11:42:48 +1000
From: Martin Phillips <sales@aus-etrade.com>
Subject: Re: finding, checking, replacing
Message-Id: <B5862CB8.59E0%sales@aus-etrade.com>

> From: "Blair Heuer" <ab@cd.com>
> Organization: EarthLink Inc. -- http://www.EarthLink.net
> Newsgroups: comp.lang.perl.misc
> Date: Sun, 02 Jul 2000 19:23:26 GMT
> Subject: finding, checking, replacing
> 
> So here's my question. How can I make a script, search through a file for a
> certain bit a text, take that text, do some actions based on what it
> actually found, and replace it with some other text according to what is in
> there. Here is an example:

Here is something that may be useful.  I'm not sure whether or not it is
exactly what you are after or not.  I have created a website management and
creation script.  Basically the way it works is to create text files with
each of the elements and then re-arranges them according to the selected
layout.

Anyway, when people come back to edit the webpages they need to access
specific elements from the text file, make changes and then a new text file
and html file are created.  The substitutions are done manually, however you
could modify what I have done and make it automatic.

If you would like to try the online demo of my script to see what I am
talking about,  go to:
http://www.aus-etrade.com/PageEdit

Also, here is a little bit of code, not perfect by any means but it does
part of what I have explained.  The particular bit that I have included
comes from a new section that I am working on for links page management,
it's not in the demo but it is pretty useful.

After selecting the link you wish to edit the follwing is done:
######
open (DATAFILE, "data.file") or die "Cannot open data.file: $!";
flock (DATAFILE, 2) or die "Cannot lock data.file: $!";
@data = <DATAFILE>;
close(DATAFILE);
# The data file has been opened and the entire file written to @data

foreach $line (@data)
  { chomp($line);
    if (grep /^$link_to_edit/, $line)
      { ($edit_link_text, $edit_link_url, $edit_link_destination,
$edit_link_description) = split(/\|/,$line);
# Each line is searhced for the $link_to_edit which must be at the start
# of the line.  When it is found, the line is split into it's various parts
# the foreach loop is exited and that information is parsed back to a
# form in the browser for the user to change.
            &add_link;
# The add_link subroutine creates the html form with the information
# chosen from the data file.
            exit;
      }
  }

#####
I hope that helps a little.

Martin







------------------------------

Date: Mon, 3 Jul 2000 10:14:03 +0800
From: "shaohong" <chenshaohong@sim.edu.sg>
Subject: How to open redirect and open new browser at same time?
Message-Id: <8josh7$s4d$1@newton3.pacific.net.sg>

Hi:

If we want to use a redirect to send the browser to some other URL, a
redirect('http://somewhere.else/') method in Perl exists to facilitate this.

Now my problem is
First I want to redirect to URL1, at same time I want to open a new browser
to some other URL2, the URL1 is still existing in the background.

What technology may I use in Perl? Need your help help!!

Many thanks.

shaohong







------------------------------

Date: Mon, 3 Jul 2000 10:31:04 +0800
From: "Philip Chan" <philipc@i-cable.com>
Subject: Re: Message board software
Message-Id: <8jotk8$8897@rain.i-cable.com>

I'm in particular looking for one that is written in Perl, is this
appropriate?

I can locate many of such software by searching through the web but would
like to get the opinion from other Perl people on about which ones are good.

Regards,
Philip


"Decklin Foster" <fosterd@hartwick.edu> ¼¶¼g©ó¶l¥ó
news:8jnr3r$tk12$3@ID-10059.news.cis.dfn.de...
> Philip Chan <philipc@i-cable.com> writes:
>
> > I'm looking for a good message board software, any suggestions?
>
> Yes. Ask in an appropriate newsgroup.
>
> --
> There is no TRUTH. There is no REALITY. There is no CONSISTENCY. There
> are no ABSOLUTE STATEMENTS. I'm very probably wrong. -- BSD fortune(6)




------------------------------

Date: Sun, 2 Jul 2000 23:27:35 -0400
From: Bennett Todd <bet@rahul.net>
Subject: Re: Need regexp pattern to verify a password is strong
Message-Id: <20000702232715.C471@oven.com>


--r7U+bLA8boMOj+mD
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline

2000-06-19-11:18:48 Daniel Read:
> What I need to do is come up with a pattern to match on to ensure
> that a password that a user is creating for himself is strong.

While building a collection of regexps that enforce various rules
may be a satisfying exercise, I'd encourage you to consider using
the module Crypt::Cracklib, available from
<URL:http://www.cpan.org/modules/by-module/Crypt/>.

-Bennett

--r7U+bLA8boMOj+mD
Content-Type: application/pgp-signature
Content-Disposition: inline


Version: GnuPG v1.0.0 (GNU/Linux)
Comment: For info see http://www.gnupg.org

iD8DBQE5YAgnL6KAps40sTYRApsbAKCQ7ytycR03JM8Ufe9R5HYR86UqpACeP9Su
BoVp59B5VDlqNPjwOXZvZoY=
=pa7m
-----END PGP SIGNATURE-----

--r7U+bLA8boMOj+mD--


------------------------------

Date: Sun, 02 Jul 2000 23:57:03 -0400
From: Michael G Schwern <stupid@pobox.com>
Subject: Perl Object Oriented Persistance (The POOP Group)
Message-Id: <39600F0F.D7B94F78@pobox.com>

There's lots of modules out there for doing object persistance.  Some
are commercial, some are on CPAN, some are people's private little
monsters.  Alot of them are redundant.  Few share code.  None talk to
each other.

Perl Object Oriented Persistance will attempt to recify this situation
through the simple act of encouraging communication and archiving
discussions amongst authors.

What POOP wants to do:
    - Get the authors of the many persistance modules talking to each other.
    - Archive foo about problems encountered and how it was solved.
    - Gives authors a place to show off how cool their code is
    - Creating generalized components for persistance.
    - Merging convergent projects.
    - Getting divergent projects to share as much code as possible.
    - Evaluating the strengths and weaknesses of available approaches
    - Testing
    - Benchmarking

What POOP is not:
    - Its not about creating One True Persistance Class
    - Its not about "why my class is better than yours"
      (no pissing matches, please)
    - Its not for supporting users of persistance classes
      (this is not a help desk), however user feedback is encouraged.

(These lists are by no means exhausitive or immutable)

There are two mailing lists:

    Discussion, development and general foo.
    POOP-group:  poop-group@lists.sourceforge.net
                 http://mail1.sourceforge.net/mailman/listinfo/poop-group

    Announcements.
    POOP-scoop:  poop-scoop@lists.sourceforge.net
                 http://mail1.sourceforge.net/mailman/listinfo/poop-scoop

So, if you've written an object persistance library, or if you're just
interested in the state of POOP today, join up!


--

Michael G Schwern      http://www.pobox.com/~schwern/      schwern@pobox.com
<GuRuThuG> make a channel called Perl, and infest it with joking and
fun....it doesnt make alot of sense.


------------------------------

Date: Sun, 02 Jul 2000 18:04:28 -0400
From: Drew Simonis <care227@attglobal.net>
Subject: Re: Redirecting output to file
Message-Id: <395FBC6C.7E85A18B@attglobal.net>



TH wrote:

> I have a cgi form whose action calls a remote cgi script with the post
> method. The problem is I need to save the output in a file and not
> display it on the browser. The output on the browser will just be a
> successful or unsuccesful message. Any ideas or a short sample code
> that can help me achieve this?
> 

Uhm...  you didn't even try with this one, did you?  

open OUTFILE, ">outfile.whatever" or die $!;

print OUTFILE "whatever you would have sent to the browser\n";

Tale some time and read the perlfaq, it will really help you out in the 
future.

www.perl.com

HTH


------------------------------

Date: Sun, 02 Jul 2000 23:27:04 GMT
From: riglerej@my-deja.com
Subject: Re: symbolic links and $PWD
Message-Id: <8joj3t$f7d$1@nnrp1.deja.com>

OK, I'll resond to my own post...

Firstly, I will explain why I was having this problem in the first
place.  My script originally worked on Solaris, running Bash 2.03.  So I
didn't understand why, when I tried to use it on a Linux computer, it
quit inheritting the $PWD variable like I expected it too.  I thought
that this was a bug in PERL, but it turns out that it is a bug in the
version of BASH that is shipped default with almost every LINUX
distribution.

Apparently BASH 1.X does not auto export the PWD and OLDPWD variables,
even though it does properly update them for the parent process.
Therefore, when perl is invoked as a child of the login shell, it tries
to figure out the $PWD, but since it no longer exists in the child
shell, it just spits out "" when I use something like...

  $dir=$ENV{PWD};

The solution is to either export the PWD and OLDPWD variables in my
bashrc or profile files, or to install a newer 2.X version of BASH.
Actually, I'll probably do both, since I don't want to mess with the
dafault "sh" (sh in linux is just a link to bash) bahavior by replacing
/bin/bash with BASH-2.X.  I would like my users to have the latest and
greatest BASH though.

If anyone else has additional insight into this issue, I'm still
interested, but for now the problem has been solved.

-EJR




In article <8jjgub$6mu$1@nnrp1.deja.com>,
  jrigler@Colorado.EDU wrote:
> Does anyone know a good trick for fooling PERL into inheritting the
$PWD
> from the shell that starts it (i.e. you know how bash and tcsh will
show
> the $PWD as the path a user cd'd to, rather than the true path if they
> followed a symlink)?  I have a relatively simple script that I want to
> run from a directory where I've installed some package...
>
>   /usr/local/package/package-ver.X
>
> In that directory, I have /bin, /lib, /etc, etc. directories.  The
> script is designed to create a symbolic link to the appropriate
> /usr/local directories.
>
> The problem is that my "/usr/local" is actually a symbolic link to a
> shared partition on my file server.
>
>  /usr/local  -->  /misc/usrlocal/local.solaris
>
> ...where...
>
>  /misc/usrlocal/local.solaris (nfsmount)-->
>                                         server:/usrlocal/local.solaris
>
> Instead of the links getting set as...
>
>  /usr/local/bin/executable  -->
>  /usr/local/package/package-ver.X/bin/executable
>
> ...I get...
>
>  /usr/local/bin/executable  -->
>  /usrlocal/local.solaris/package/package-ver.X/bin/executable
>
> Which ONLY exists if a person is logged into the file server.  This
has
> got to be a common problem, but I can't figure out a way around it
> reading the Programming PERL book by O'Reilly, and I've tried
everything
> suggested for using "Use Cwd;" and "Use Cwd 'chdir';".
>
> Thanks for any help!
>
> -EJR
>
> Sent via Deja.com http://www.deja.com/
> Before you buy.
>


Sent via Deja.com http://www.deja.com/
Before you buy.


------------------------------

Date: Mon, 03 Jul 2000 00:15:44 GMT
From: arthur <star@sonic.net>
Subject: the whole problem
Message-Id: <B584802D.2B9C%star@sonic.net>

Good eEvening,

I have a perl script that after it gets some data I want it to put it on an
html page. Well it gets the data and then gives that ole' malformed header.
I will give the .pl and the .html scripts and I am hoping someone can HELP!

Here is the html
<html>
<head>
<title>GetDat</title>
</head>
<body>>
<h2> Q and A's</h2>
<FORM ACTION="http://www.sonic.net/cgi-bin/star/question.pl"
Whats your question< <INPUT NAME="question" Value="why">
<p>
<Input Type ="submit">
</form>
</body>
</html>

here is the .pl

#!/user/bin/perl -w

use CGI qw(:standard);
puzzles
my $questions = param("puzzles");
print header,p, start_html("Q and As"), h1("Q and As");
print p("your question is " $question);
print p("write a question; ", textfield("puzzles", "why"));
print end-form, hr;

I can not figure this out--I sure hope someone can help.

~arthur
star@sonic.net




------------------------------

Date: 02 Jul 2000 19:38:41 -0500
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: the whole problem
Message-Id: <87vgyo120e.fsf@limey.hpcc.uh.edu>

>> On Mon, 03 Jul 2000 00:15:44 GMT,
>> arthur <star@sonic.net> said:

> here is the .pl

> #!/user/bin/perl -w

You're sure it's /user and not the more usual /usr?

A "use strict;" at this point would be a good idea too.

> use CGI qw(:standard);

use CGI::Carp 'fatalsToBrowser';

would maybe help to identify the problem.  Or at least it
will later on.

> puzzles

Look no further, here's a glaring syntax error.  This *is*
the code you're having problems with, not something you
typed in and then mucked about with?  You might be
surprised how often that happens here.  Or perhaps you
might not...

Do you have perl installed on your local machine?  If you
do, you can test the program locally (perl -cw file.pl).
If it's not installed, a visit to http://www.perl.com/
will remedy the situation.

hth
t
-- 
"With $10,000, we'd be millionaires!"
                                           Homer Simpson


------------------------------

Date: Sun, 02 Jul 2000 23:07:01 +0100
From: Magic <Magic@mattnet.freeserve.co.uk>
Subject: Re: Welcome to....
Message-Id: <cqevlssuidriblce8si2f4c70pcpbfpv2c@4ax.com>

On 02 Jul 2000 13:52:40 -0500, Tony Curtis <tony_curtis32@yahoo.com>
wrote:

> FUD FUD and more FUD.

*Non-abusive interpretation of acronym assumed*

> AS. perl comes with documentation available in HTML format
> straight off your Windows "Start" menu.

Help staright of the Start menu? Strange... I see no icons in my
Programs groups... an easter-egg feature maybe? DO I need to create a
text file with special keywords in it then attempt to run it?

>And AS. perl
> works fine.  "I can't get it to work" is not the same as
> "it doesn't work".

Well alright.... It doesn't work if you're running Win98SE with a P3
then, at least that seems to ring true for the 75 P3 systems at Uni.
Unfortunately having a P3 system myself and Win98SE, I'm screwed in
that respect, so I have to rely on a remote system to try any scripts
on. All I get is a DOS box apear hen I try to run a perl script and
nothing happens. If I try the call via a browser using the web server
software (I installed Apache) I get a DOS box appear, then the system
crashes and I have to reset. Not what you call a friendly environment
for somebody wanting to start out in a programming language is it.
 
> You said you were going to leave this group in a previous,
> abusive, post.  Please do so.  That kind of language is
> going to get you kicked off your ISP.  Have you read
> news.announce.newusers recently?  A 'net search on
> "netiquette" would be a good start too.

Sorry, but I was not amusied at the attempts by some members to get me
to erase the data on my ISP's web server. I read
news.announce.newusers about 12 years ago.



Magic        ==|:o)
-- 
Location : Portsmouth, England, UK
Homepage : http://www.mattnet.freeserve.co.uk
EMail : mailto:Magic@mattnet.freeserve.co.uk


------------------------------

Date: Sun, 2 Jul 2000 17:14:18 -0500
From: "Billy Chambless" <billy@erc.msstate.edu>
Subject: Re: Welcome to....
Message-Id: <8joep0$ph7$1@nntp.msstate.edu>


Magic <Magic@mattnet.freeserve.co.uk> wrote in message
news:en0vlsct0vuuvdvc06sabj6h030j0ij97u@4ax.com...

> I'd say the opposite. Due to the way Perl looks like encrypted trash
> when you look at the program and seems to have no meaningful name to
> the commands,

Almost but not quite. Perl code looks like.... well, Perl code. And unless
that sneaky
Larry guy added some stuff while I wasn't looking, it doesn't have
"commands".
It's got tons of operators and functions, though. And most of the names are
quite meaningful, although a background in Unix and/or C is pretty helpful
at
fisrst to understand them.

> What kind of dumb fuck enables you to use the command "open" to erase
things????

Ah.... what we have here is a case of paradigm shift-induced cognitive
dissonance.
Decades of computer science research uncovered a basic fact of the universe:

    If you try to stop stupid people form doing stupid things, you
invariably
    end up stopping clever people from doing clever things.

The implication of this is that you have to leave clever people the
responsibility
to not do stupid things, and as for the stupid people... well, wouldn't it
be better
if they didn't try to program computers anyway?

> Really? Of it wasn't for the "open" command being stupid enough to
> allow you erase everything then there wouldn't be a security issue
> there at all.

What a concept: a "stupid command".
I've used "open()" about 97897 times in Perl (as well as its C ancestor),
and
it's never ONCE done anything stupid of its own accord. A couple of times
I stupidly TOLD it to do something stupid, and it obediently carried out my
orders. I wish I'd known I could just blame the language instead of having
to
read that big old book and actually learn to use the language.


> > Thanks oh so much for leaving.

> > We all appreciate it!

> No problem. Call me when you grow out of your diapers wont you cry
> baby.

Pots, kettles, Nazis.





------------------------------

Date: Sun, 2 Jul 2000 17:18:09 -0500
From: "Billy Chambless" <billy@erc.msstate.edu>
Subject: Re: Welcome to....
Message-Id: <8jof06$pip$1@nntp.msstate.edu>


Magic <Magic@mattnet.freeserve.co.uk> wrote in message
news:db3vls8au9oq1qk7m1b0btmm65ib3otenq@4ax.com...
> On 02 Jul 2000 11:26:42 -0700, merlyn@stonehenge.com (Randal L.
> Schwartz) wrote:

> > But you gotta spend at least 15 minutes skimming "perldoc perlsec".
> > Most people that post code don't even get that far, and it's giving
> > the rest of us a bad name.

> Well as that includes me I would hazard a guess that's because their
> first exposure to Perl is in the CGI environment, where no Unix
                                                ^^^
> commands are available and no documentation is supplied.

Did you mean "Windows"?

AFAIK, all of the Perl documentation is on the Web. It *is* a lot more fun
having
it installed locally, though.






------------------------------

Date: Sun, 2 Jul 2000 17:33:52 -0500
From: "Billy Chambless" <billy@erc.msstate.edu>
Subject: Re: Welcome to....
Message-Id: <8joftl$qcl$1@nntp.msstate.edu>


Magic <Magic@mattnet.freeserve.co.uk> wrote in message
news:cqevlssuidriblce8si2f4c70pcpbfpv2c@4ax.com...
> On 02 Jul 2000 13:52:40 -0500, Tony Curtis <tony_curtis32@yahoo.com>
> wrote:

> >And AS. perl works fine.  "I can't get it to work" is not the same as
> > "it doesn't work".

> Well alright.... It doesn't work if you're running Win98SE with a P3
> then, at least that seems to ring true for the 75 P3 systems at Uni.
> Unfortunately having a P3 system myself and Win98SE, I'm screwed in
> that respect, so I have to rely on a remote system to try any scripts
> on. All I get is a DOS box apear hen I try to run a perl script and
> nothing happens. If I try the call via a browser using the web server
> software (I installed Apache) I get a DOS box appear, then the system
> crashes and I have to reset. Not what you call a friendly environment
> for somebody wanting to start out in a programming language is it.

Ah... all of this rings some bells.

"It doen't work" still isn't exactly right. "I haven't gotten it to work
yet" actually describes your
situation better. Once you say it that way, (a) you're in a
positive-attitude headspace,
which will help of itself, and (b) people will respond with "Oh, yeah,
getting Perl to
run on MS is a pain in the butt until you..." and then they'll help you get
it set up.

I would offer some help, but my solution to running a Web server on a PC
involves
installing Linux.





------------------------------

Date: Mon, 3 Jul 2000 00:53:14 +0100
From: "Dr Joolz" <julius_mong@hotmail.com>
Subject: XML Modules
Message-Id: <8jokc2$842$1@oyez.ccc.nottingham.ac.uk>

Dear All, I'm trying to learn about the XML package, such as Parser, DOM,
Generator etc, could someone tell me where I could find these modules for
download and code examples of how to use them?

Thanks,
        Jules

***24 hours in a day...24 beers in a case...coincidence?***




------------------------------

Date: Mon, 03 Jul 2000 01:41:57 GMT
From: clintp@geeksalad.org (Clinton A. Pierce)
Subject: Re: XML Modules
Message-Id: <FbS75.19107$fR2.199653@news1.rdc1.mi.home.com>

[Posted and mailed]

In article <8jokc2$842$1@oyez.ccc.nottingham.ac.uk>,
	"Dr Joolz" <julius_mong@hotmail.com> writes:
> Dear All, I'm trying to learn about the XML package, such as Parser, DOM,
> Generator etc, could someone tell me where I could find these modules for
> download and code examples of how to use them?

Same place you find any modules...CPAN.

Try http://search.cpan.org for a nice easy start.

-- 
    Clinton A. Pierce              Teach Yourself Perl in 24 Hours! 
  clintp@geeksalad.org         for details see http://www.geeksalad.org
"If you rush a Miracle Man, 
	you get rotten Miracles." --Miracle Max, The Princess Bride


------------------------------

Date: Mon, 03 Jul 2000 02:36:01 GMT
From: neil@brevity.org (Neil Kandalgaonkar)
Subject: Re: XML Modules
Message-Id: <8jotq6$3b1$1@localhost.localdomain>

In article <8jokc2$842$1@oyez.ccc.nottingham.ac.uk>,
Dr Joolz <julius_mong@hotmail.com> wrote:
>Dear All, I'm trying to learn about the XML package, such as Parser, DOM,
>Generator etc, could someone tell me where I could find these modules for
>download and code examples of how to use them?

The XML "package" is a bit of a misnomer. The CPAN's namespace isn't 
managed like that.

Michel Rodriguez wrote a review of Perl XML modules:

<http://standards.ieee.org/resources/spasystem/twig/perl_xml/perl_xml.html>

No examples, but it will help orient yourself.


-- 
Neil Kandalgaonkar <neil@brevity.org>


------------------------------

Date: Mon, 03 Jul 2000 02:37:23 GMT
From: neil@brevity.org (Neil Kandalgaonkar)
Subject: Re: XML Modules
Message-Id: <8jotsp$3bn$1@localhost.localdomain>

In article <8jotq6$3b1$1@localhost.localdomain>,
Neil Kandalgaonkar <neil@brevity.org> wrote:
>Michel Rodriguez wrote a review of Perl XML modules:
>
><http://standards.ieee.org/resources/spasystem/twig/perl_xml/perl_xml.html>
>
>No examples, but it will help orient yourself.

I take that back, there are examples! :)

-- 
Neil Kandalgaonkar <neil@brevity.org>


------------------------------

Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin) 
Subject: Digest Administrivia (Last modified: 16 Sep 99)
Message-Id: <null>


Administrivia:

The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc.  For subscription or unsubscription requests, send
the single line:

	subscribe perl-users
or:
	unsubscribe perl-users

to almanac@ruby.oce.orst.edu.  

| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.

To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.

To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.

For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.


------------------------------
End of Perl-Users Digest V9 Issue 3541
**************************************


home help back first fref pref prev next nref lref last post