[12287] in Perl-Users-Digest
Perl-Users Digest, Issue: 5887 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Jun 4 13:07:17 1999
Date: Fri, 4 Jun 99 10:00:24 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Fri, 4 Jun 1999 Volume: 8 Number: 5887
Today's topics:
Re: \n doesn't work on NT4 SP4 <cassell@mail.cor.epa.gov>
Re: A new module: Naming, etc ?? <phillips@central.murdoch.edu.au>
Re: A new module: Naming, etc ?? <gellyfish@gellyfish.com>
Re: Anyone know what is this script line meaning ?? <emschwar@rmi.net>
Re: bareface ratio (Rich Lafferty)
Re: bareface ratio <jeromeo@atrieva.com>
Re: Basic oraperl array question <jhecker@iago.nac.net>
Re: Broken Pipe - nit picking (M.J.T. Guy)
Re: capture the output from screen?? <aqumsieh@matrox.com>
Re: CGI Scripting to a database paulm@dirigo.com
Coloring text in DOS console? <mpriatel@activesystems.ca>
Copying any files <Alar@mtk.ut.ee>
Re: Copying any files <gellyfish@gellyfish.com>
Re: Copying any files <gellyfish@gellyfish.com>
Re: Copying any files <Alar@mtk.ut.ee>
followup: taint checking problems (Alan Young)
Re: GD, PPM, XML: Parser marlon-shakespeare@hotbot.com
Got it! <spike1965@worldnet.att.net>
Re: How do you print a file backwards by line? <jdporter@min.net>
Re: how to track users (w/out cookies) and write to the <jeromeo@atrieva.com>
Re: I don't understand this warning: <jdporter@min.net>
Re: know Perl to maintain Perl (was: Re: I pass an arra <cassell@mail.cor.epa.gov>
let me be more specific... jamiemw@my-deja.com
Re: mail problems... still :) <cassell@mail.cor.epa.gov>
MIME-QuotedPrint Module the1bob@my-deja.com
multiple windows using Perl/Tk tkd_black_belt@my-deja.com
Re: Perl compiler...If or when (David Cantrell)
Re: Perl Unicode/Multibyte Support (Kai Henningsen)
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 04 Jun 1999 09:04:16 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: \n doesn't work on NT4 SP4
Message-Id: <3757F900.F6D28B1@mail.cor.epa.gov>
Fadel wrote:
>
> Just try print("bla bla\n");
> instead of print "bla bla\n";
Errm, that's not necessary. print() takes a list [after an
optional filehandle] and is smart enough to recognize a list
when it sees one. So you don't need parens there. In fact,
parens immediately following 'print' are one of the few ways
to confuse the print() function, as explained in the docs.
[See perlfunc.]
HTH,
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Fri, 04 Jun 1999 22:55:00 +0800
From: Trevor Phillips <phillips@central.murdoch.edu.au>
Subject: Re: A new module: Naming, etc ??
Message-Id: <3757E8C4.7AD5AC81@central.murdoch.edu.au>
David Cassell wrote:
>
> Trevor Phillips wrote:
> >
> > Hi! I'm taking my first steps into writing a Perl Module with the intent
> > of publically distributing it via CPAN. As such, I'm after some tips on
> > some issues, the biggie being what to call the smegger, and to see if
> > anything similar has been done.
>
> You might want to check in perlmodlib if you haven't already.
> It has some helpful text on this subject. And CPAN itself has
> plenty of helpful suggestions if you haven't found them yet.
> But you probably already have, since you're writing a module.
> Right?
Where do you think I found a reference to this newsgroup? ^_^
States in the Perl Docs that for queries and ideas on naming modules,
post to comp.lang.perl.misc ... Yours is the only response I've had so
far...
Maybe .modules would've been better? (Maybe cross-post this? Been ages
since I've used News; back in the days when you could count the number
of groups on 2000 fingers. ^_^)
> Since you seem to be focusing on CGI applications, perhaps
> you could call it CGI::Fields. Have you asked about this in
> comp.lang.perl.modules ?
Not yet. Yes, the idea is for CGI's, but that isn't necessarily all it
could be used for. For example, it could be used from the command-line
to generate text (email?) reports from database stored data. Could also
extend the functionality to support fields in some form of other GUI
format, such as
> > So something fairly generic would be good, so maybe Data/Fields ?? What
> > do people think??
>
> Is there a general "Data::" category? I haven't found one on
> CPAN.
There is a Data directory in the by-module listing ...
--
. Trevor Phillips - http://jurai.murdoch.edu.au/ .
: CWIS Technical Officer - T.Phillips@murdoch.edu.au :
| IT Services - Murdoch University |
>------------------- Member of the #SAS# & #CFC# --------------------<
| On nights such as this, evil deeds are done. And good deeds, of /
| course. But mostly evil, on the whole. /
\ -- (Terry Pratchett, Wyrd Sisters) /
------------------------------
Date: 4 Jun 1999 16:18:23 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: A new module: Naming, etc ??
Message-Id: <3757ee3f@newsread3.dircon.co.uk>
Trevor Phillips <phillips@central.murdoch.edu.au> wrote:
> Hi! I'm taking my first steps into writing a Perl Module with the intent
> of publically distributing it via CPAN. As such, I'm after some tips on
> some issues, the biggie being what to call the smegger, and to see if
> anything similar has been done.
>
You might also want to see the useful advice given at:
<http://www.cpan.org/modules/04pause.html>
if you havent already seen it ...
/J\
--
Jonathan Stowe <jns@gellyfish.com>
------------------------------
Date: 04 Jun 1999 10:23:11 -0600
From: Eric The Read <emschwar@rmi.net>
Subject: Re: Anyone know what is this script line meaning ??
Message-Id: <xkfwvxk9bps.fsf@valdemar.col.hp.com>
Jonathan Stowe <gellyfish@gellyfish.com> writes:
> Oh no ! Matt's been posessed by the spirit of Larry R ;-}
That's ridiculous! There wasn't one 'use Benchmark;' in there
anywhere. :^)
-=Eric
------------------------------
Date: 4 Jun 1999 15:12:46 GMT
From: rich@vax2.concordia.ca (Rich Lafferty)
Subject: Re: bareface ratio
Message-Id: <7j8qde$qk3$1@newsflash.concordia.ca>
Jerome O'Neil <jeromeo@atrieva.com> wrote:
>
> I have derived a new unit of measurement for measuring usenet threads
> called the 'pedant.' A long thread's length is guaranteed to be at least
> two pedants long.
>
> O'Neil's corollary to Goodwin's Law: "The length of a thread needed to
> prove Goodwin's Law is inversely proportional to it's pedant measure."
Godwin, dammit. Godwin.
(You wanted it. :-)
-Rich
--
Rich Lafferty -----------------------------------------------------
IITS/Computing Services | Carpe canum!
Concordia University |
rich@vax2.concordia.ca -------------------------------------[McQ]--
------------------------------
Date: Fri, 04 Jun 1999 08:30:20 -0700
From: Jerome O'Neil <jeromeo@atrieva.com>
To: Rich Lafferty <rich@vax2.concordia.ca>
Subject: Re: bareface ratio
Message-Id: <3757F10C.EC6053BB@atrieva.com>
Rich Lafferty wrote:
>
> Jerome O'Neil <jeromeo@atrieva.com> wrote:
> > O'Neil's corollary to Goodwin's Law: "The length of a thread needed to
> > prove Goodwin's Law is inversely proportional to it's pedant measure."
>
> Godwin, dammit. Godwin.
>
> (You wanted it. :-)
Indeed. Professional pedants everywhere also caught my misuse of the
possesive 'its', so you have some catching up to do!
;->
------------------------------
Date: Fri, 04 Jun 1999 15:25:49 GMT
From: Jared Hecker <jhecker@iago.nac.net>
Subject: Re: Basic oraperl array question
Message-Id: <1eS53.4$tr.21@nntp1>
<blush> found the section. Thank you.
In comp.lang.perl.misc John D Groenveld <groenvel@cse.psu.edu> wrote:
> In article <KTx53.667$m4.3117@nntp1>,
> Jared Hecker <jhecker@iago.nac.net> wrote:
> >Nothing in the Oraperl docs refers to this and I feel like I am writing
> >way too many cursors and fetches to do something like this.
> perldoc Oraperl
> ora_fetch
> Used in an array context, the value returned is an array
> containing the data, one element per field. Note that this
> will not work as expected:
> If you switch from the emulation module to DBI, you can access those
> values in a multitude of ways. See perldoc DBI
> #!/usr/bin/perl -w
> use strict;
> use DBI;
> my $dbh = DBI->connect("dbi:Oracle:", "scott", "tiger", {RaiseError=>1});
> my $sth = $dbh->prepare("SELECT ename, empno FROM emp");
> $sth->execute();
> #
> my ($ename, $empno);
> $sth->bind_columns(undef, \($ename, $empno));
> while ($sth->fetchrow-arrayref) {
> print $ename, $empno;
> }
> ## or
> #my @row;
> #while (@row = $sth->fetchrow_array) {
> # print $row[0], $row[1];
> #}
> ## or
> #my $row_ref;
> #while ($row_ref = $sth->fetchrow_hashref) {
> # print $row_ref->{"ENAME"}, $row_ref->{"EMPNO"};
> #}
> $sth->finish;
> $dbh->disconnect;
> >If it is convenient, e-mail will reach me faster.
> While faster and more convenient for you, email does nothing to help save
> the world by sharing our answers and allowing them to be archived.
> John
> groenveld@acm.org
--
Jared Hecker | HWA Inc. - Oracle architecture and Administration
jared@hwai.com | ** serving NYC and New Jersey **
------------------------------
Date: 4 Jun 1999 15:43:18 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: Broken Pipe - nit picking
Message-Id: <7j8s6m$hk4$1@pegasus.csx.cam.ac.uk>
Tom Phoenix <rootbeer@redcat.com> wrote:
>
>If you instead do the open on "-|" and exec your program directly with the
>multiple-arg form of exec (after doing your own input redirection or
>whatever) I think you'll find no Bash, no message, no problem. See the
>docs on open if you're not familiar with "-|".
Usually, that's overkill. open on "my_command args |" won't
involve the shell unless shell metacharacters are present. And if
you're using shell metacharacters, you won't be able to use the
multi-arg form of exec anyway.
Mike Guy
------------------------------
Date: Fri, 4 Jun 1999 10:45:30 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: capture the output from screen??
Message-Id: <x3yvhd42feg.fsf@tigre.matrox.com>
John Paopeng <ppjohn@ncs.com.sg> writes:
> Fadel wrote:
> >
> > just use the normal redirection output ">" when you execute the ping command:
> > the code would look like :
> > system("ping my.server.com >c:\\ip.txt");
This is a really silly and extremely slow approach.
> Yeap... I did that also but I just curious whether or not there is
> another
> way around to do this as I don't want to redirect to the file. I just
> some how
> want to capture it from screen(monitor) directly.
You can't capture anything from the screen, but you can capture the
output of your command into a scalar.
$_ = qx/ping my.server.com/;
or
$_ = `ping my.server.com`;
Note that the line above uses back-quotes and not regular single
quotes. Read more about back-quotes in perlop.
HTH,
Ala
------------------------------
Date: Fri, 04 Jun 1999 15:25:18 GMT
From: paulm@dirigo.com
Subject: Re: CGI Scripting to a database
Message-Id: <7j8r4g$fpb$1@nnrp1.deja.com>
Sweet! This is a great start. With this in mind, does this site go
into detail about how the code would look to pull out data from
fields/tables from a database and then send them to an html file?
Thanks for your help.
In article <3756D144.5C659782@well.com>,
Greg McCann <gregm@well.com> wrote:
> paulm@dirigo.com wrote:
> >
> > I'm currently in the process of setting up our database to be web
> > enabled. Does anyone know of a place where I can get an idea of
how to
> > write CGI scripts to query a database via ODBC?
>
> http://www.roth.net/perl/odbc/
>
> --
>
> ======================
> Gregory McCann
> http://www.calypteanna.com
>
> "Be kind, for everyone you meet is fighting a great battle." Saint
Philo of
> Alexandria
>
--
Paul R. Mesker
System Engineer
Dirigo Inc.
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Fri, 04 Jun 1999 11:29:23 -0400
From: Mark Priatel <mpriatel@activesystems.ca>
Subject: Coloring text in DOS console?
Message-Id: <3757F0D3.8BC94944@activesystems.ca>
Two quick questions:
- How can I color the output of a Perl program in a MS-DOS shell.
- How can I reposition the cursor in a MS-DOS shell.
I've tried fooling around with the Term::Ansi module, but didn't have
any luck.
Thanks,
Mark.
------------------------------
Date: Fri, 4 Jun 1999 18:42:11 +0300
From: "Alar Pandis" <Alar@mtk.ut.ee>
Subject: Copying any files
Message-Id: <7j8s61$dkj$1@kadri.ut.ee>
Hi, Jonathan!
Thanks.
Can You give example how can I use modules? I have file A and need copy this
file into location B.
Thanks again,
Alar.
Tartu University, ESTONIA.
Alar Pandis <Alar@mtk.ut.ee> wrote:
> Hi!
> I am new one in this programming area. I would like ask You to help me - I
> need just copy files via Perl (5.x) from one location into another
location
> (no matter what is a file type; with only text-files no problem). How can
I
> do that?
You probably want to use the module File::Copy which is part of the
core distribution.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
------------------------------
Date: 4 Jun 1999 15:50:22 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Copying any files
Message-Id: <3757e7ae@newsread3.dircon.co.uk>
Alar Pandis <Alar@mtk.ut.ee> wrote:
> Hi!
> I am new one in this programming area. I would like ask You to help me - I
> need just copy files via Perl (5.x) from one location into another location
> (no matter what is a file type; with only text-files no problem). How can I
> do that?
You probably want to use the module File::Copy which is part of the
core distribution.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
------------------------------
Date: 4 Jun 1999 16:56:12 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Copying any files
Message-Id: <3757f71c@newsread3.dircon.co.uk>
Alar Pandis <Alar@mtk.ut.ee> wrote:
> Hi, Jonathan!
> Thanks.
>
> Can You give example how can I use modules? I have file A and need copy this
> file into location B.
>
perldoc File::Copy
NAME
File::Copy - Copy files or filehandles
SYNOPSIS
use File::Copy;
copy("file1","file2");
/J\
--
Jonathan Stowe <jns@gellyfish.com>
------------------------------
Date: Fri, 4 Jun 1999 19:19:22 +0300
From: "Alar Pandis" <Alar@mtk.ut.ee>
Subject: Re: Copying any files
Message-Id: <7j8ubr$lg0$1@kadri.ut.ee>
Hi again!
I did that, but result is that by example Word-files or ZIP-files is copied
not correctly. I got the same result if I did this via OPEN FILE and PRINT
etc.
What I am doing wrong? (With TXT-files is OK!, as usually.)
Thanks again,
Alar.
Jonathan Stowe <gellyfish@gellyfish.com> wrote in message
news:<3757f71c@newsread3.dircon.co.uk>...
> Alar Pandis <Alar@mtk.ut.ee> wrote:
> > Hi, Jonathan!
> > Thanks.
> >
> > Can You give example how can I use modules? I have file A and need copy
this
> > file into location B.
> >
>
> perldoc File::Copy
>
> NAME
> File::Copy - Copy files or filehandles
>
> SYNOPSIS
> use File::Copy;
>
> copy("file1","file2");
>
>
> /J\
> --
> Jonathan Stowe <jns@gellyfish.com>
>
------------------------------
Date: Fri, 04 Jun 1999 16:47:06 GMT
From: alany@2021.com (Alan Young)
Subject: followup: taint checking problems
Message-Id: <375c024f.5462617@news.supernews.com>
I just changed _backtick_pwd to
sub _backtick_pwd {
my $cwd;
my $tmppath = $ENV{PATH}
$tmppath =~ /^(.*)$/;
$tmppath = $1;
$ENV{PATH} = $tmppath;
chop($cwd = `pwd`);
$cwd;
}
and got the same error message. I really don't want to run this
script without taint checking because this will be a web accessible
script that clients will be able to set parms for.
Alan
------------------------------
Date: Fri, 04 Jun 1999 14:16:28 GMT
From: marlon-shakespeare@hotbot.com
Subject: Re: GD, PPM, XML: Parser
Message-Id: <7j8n3h$duc$1@nnrp1.deja.com>
I've found the answer to my own problem - I didn't realise I needed to
install GD.ppd before GIFgraph.ppd (this assumption I have made since I
just installed GD, and then the install for GIFgraph worked fine).
SNAFU.
Cheers,
Marlon
> I may be having a related problem to this: When trying to install
> GIFgraph from the command line: ppm install GIFgrapg.ppd (firewall
probs
> prevent using ppm) under build 509 and 517 I receive the error: "not
> well formed at line 5, column 14, byte 67 at
> c:/perl/site/lib/XML/Parser.pm"
>
> Any help would be greatly appreciated.
> Cheers,
> Marlon
>
> Sent via Deja.com http://www.deja.com/
> Share what you know. Learn what you don't.
>
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Fri, 4 Jun 1999 12:07:19 -0400
From: "Terry Mealy" <spike1965@worldnet.att.net>
Subject: Got it!
Message-Id: <7j8tg2$67o$1@bgtnsc02.worldnet.att.net>
The actual problem was with the third conditional -
if($city_data{$contract.$cities[$#flight]} ...
It had an undef that I finally found after break apart the nesting. I
wonder why I was getting the warning at the first conditional, though? Does
perl evaluate all of the conditions in nested conditional, whether they are
true or false?
Terry Mealy <spike1965@worldnet.att.net> wrote in message
news:7j6kh2$f1n$1@bgtnsc03.worldnet.att.net...
> I am writing a rather large script to generate some prices, and I am
having
> problems with the following snippet which recurs in a for loop:
> ************************************
>
> if ( $cities[$#flight] ne $cities[$#flight + 1] ) {
> if($con_data{'ANCHOR'.$con_name} eq "Zero"){ #see if contract requires
> anchor
> if($city_data{$contract.$cities[$#flight]} ne "Zero" ||
> $city_data{$contract.$cities[$#flight + 1]} ne "Zero"){ #check to see if
> either city is not an anchor city
> $rej_cons{$valid_cons[$contract]} .= '/"Mixed" contracts not allowed';
> #Add contract to rejected contracts & append reason for rejection
> }
> }
> }
>
> ************************************
> I thought that very few of you would wish to see the entire script.
>
> In any case, the problem occurs when I used the -w switch. The first line
> generates a warning of "Use of uninitialized value at...".
>
> All of the vars that appear in this snippet have most definitely been
> initialized with my, (I am using sctrict) and in fact all of them were
used
> previously in other conditionals without warnings.
>
> Substituting either value with a constant doesn't get rid of the warning.
>
> Can anyone clue me into what might be happening?
>
> I am using ActiveState perl on a Window$ 95 box. I am a perl novice. I
just
> graduated last month from perl neophyte.
>
>
------------------------------
Date: Fri, 04 Jun 1999 14:46:55 GMT
From: John Porter <jdporter@min.net>
Subject: Re: How do you print a file backwards by line?
Message-Id: <7j8oss$eo0$1@nnrp1.deja.com>
In article <37571e04.354494234@news.oz.net>,
tgy@chocobo.org wrote:
> On Wed, 02 Jun 1999 13:46:58 GMT, John Porter <jdporter@min.net>
wrote:
>
> >Or even better (;-) --
> >
> > sub tac {
> > local $_;
> > while(<>){
> > (\&{(caller 0)[3]})->();
> > print;
>
> last;
>
> > }
> > }
> >
> > tac();
Interesting -- the 'last' is not necessary, as long as the <> is
reading from STDIN (or some explicit handle, like <F> or <DATA>).
But if it's reading from a file named in @ARGV, then it won't
work without the 'last'. Strange!
--
John Porter
Put it on a plate, son. You'll enjoy it more.
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Fri, 04 Jun 1999 08:22:07 -0700
From: Jerome O'Neil <jeromeo@atrieva.com>
To: Marc Bissonnette <dragnet@internalysis.com>
Subject: Re: how to track users (w/out cookies) and write to them individually
Message-Id: <3757EF1F.8D73E475@atrieva.com>
Marc Bissonnette wrote:
> >that's not right. there are other ways to do it, but none of
> >them are specifically Perl.
>
> Wouldn't you be able to do it if the navigation of each page were a form,
> parsed by Perl? If, upun submit for next link, the script printed out the next
> page to <STDOUT>, replacing the HIDDEN tag (as mentioned above) with a session
> ID? Probably kinda clunky, but I've used that to track users through a
> multi-form process online.
Using a HIDDEN tag will only work if you use the POST method. Forms
aren't the only thing used to execute CGI scripts.
<A HREF="/cgi-bin/foo.cgi?a=1&b=2">Foo!</A>
--
Jerome O'Neil, Operations and Information Services
Atrieva Corporation, 600 University St., Ste. 911, Seattle, WA 98101
jeromeo@atrieva.com - Voice:206/749-2947
The Atrieva Service: Safe and Easy Online Backup http://www.atrieva.com
------------------------------
Date: Fri, 04 Jun 1999 14:36:48 GMT
From: John Porter <jdporter@min.net>
Subject: Re: I don't understand this warning:
Message-Id: <7j8o9v$ef0$1@nnrp1.deja.com>
In article
<E53168E01BAD1FB9.A1A060B4BEDA3F44.6F7E89B043948699@lp.airnews.net>,
Josh Martel <jmschwa@airmail.net> wrote:
>
> Use of uninitialized value at survey.cgi line 20.
>
> 17:foreach $_ (@confbuffer) {
You don't need the $_ there. It's the default.
> 18: chomp;
> 19: ($key, $val) = split (/\s*=\s*/);
It would certainly be better to make these 'my' here, rather than
outside the loop. i.e.
my( $key, $val ) = ...
> 20: if ($key =~ m/inputfield/) {
Since $key is (apparently) sometimes undef here, just put a test
for that condition before doing anything else with it. i.e.
unless ( defined $key ) { next } # skip rest of loop
or even:
defined $key or next; # "poetry mode".
> I am using "use strict" at the top of the file.
Excellent and wise.
> 32: my $buffer="";
> 33: read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
AAAAAAGGHHH!
use CGI; # solve all your worries!
Don't know how?
perldoc CGI
--
John Porter
Put it on a plate, son. You'll enjoy it more.
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Fri, 04 Jun 1999 09:48:18 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
To: Bill Jones <bill@fccj.org>
Subject: Re: know Perl to maintain Perl (was: Re: I pass an array...)
Message-Id: <37580352.9F18F3D5@mail.cor.epa.gov>
[cc sent to poster]
Bill Jones wrote:
>
> [Greg's comments snipped]
>
> Larry did say something about Baby Talk Perl :]
I see the followups didn't notice the ':]' there.
> But there is no reason not to program any way you
> see fit, or can, program. I myself spent some time
> with some of the things I've seen here in the group.
Ditto. Not all of us came into Perl with a graduate degree
that had an emphasis on operating systems design and
computational linguistics. :-)
> I am Baby Perl, pleased to meet you,
I've been waiting for the obligatory 'Spice Girls' joke,
but I haven't seen it yet.
> PS - Please pardon my rantings as I am the proud new father
> of a baby girl - Taylor Reese Jones :] No, not into perl, not yet...
Mazel tov! As one father to another: don't count on getting
a full night's sleep any time soon...
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Fri, 04 Jun 1999 14:25:28 GMT
From: jamiemw@my-deja.com
Subject: let me be more specific...
Message-Id: <7j8nkc$e66$1@nnrp1.deja.com>
Thanks for the quick reply Tom. I looked though the url you gave me and
couldn't really find what I was looking for. Let me be a little more
specific...
I don't really know perl, and although I have some C++ background, I
would like something quick and dirty to throw on my site. My
alternatives are to learn Interdev or Cold Fusion. I'd rather dig into
perl.
So I want a script that presents a form where the user enters their
username and password and clicks, log-in. The script would query the
flat-file database and return their account balance.
That's it. Maybe they would be able to change their password.
Thanks again,
Jamie Wallace
jwallace@fcfc.com
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Fri, 04 Jun 1999 09:39:29 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: mail problems... still :)
Message-Id: <37580141.B2B75940@mail.cor.epa.gov>
Bastiaan S van den Berg wrote:
>
> i don't use module x because my isp only has 2 modules installed , cpan db
> and some other db variant..
'cpan' isn't a module at all. CPAN.pm is a very useful module,
but it's not a db. And if they have a modern Perl installed,
they ought to have more than *two* modules!
> they we're stupid enough to not know where perl was on there server , so i
> gave up expecting help from them ..
> [other stuff snipped]
Well, that sounds pretty discouraging. But just because you
got one ill-informed phone/email contact doesn't mean there
is no one competent there. Maybe you got the newbie who doesn't
grok programming languages. If you can telnet to the ISP's
machine and run 'perldoc' to look at the docs, then you may
be able to check on the existence of a variety of modules.
Like this:
perldoc CPAN
If CPAN.pm is installed (properly), then you'll get a manpage
for the module. And perldoc -M CPAN will show you the code
and pod of the module. So you might be able to check whether
CGI.pm is installed already, or MIME::Lite.
If, on the other hand, your ISP is really that clueless, you'll
want to run this:
perl -v
and find out whether they have a modern Perl installed.
Also, you'll want to read perlfaq8, since you may be able
to install modules yourself for your own private use. See
these questions in perlfaq8:
How do I install a CPAN module?
What's the difference between require and use?
How do I keep my own module/library directory?
How do I add the directory my program lives in to the
module/library search path?
How do I add a directory to my include path at runtime?
HTH,
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Fri, 04 Jun 1999 14:24:12 GMT
From: the1bob@my-deja.com
Subject: MIME-QuotedPrint Module
Message-Id: <7j8nhv$e3t$1@nnrp1.deja.com>
Hello, all!
I just successfully installed Jenda's Mail-Sender PM and can't wait to
start testing it. :-)
I have, by default, MIME-Base64 installed as part of the ActivePerl
distribution. Mail-Sender also requires MIME-QuotedPrint. Where can I
get that module? It was not on her site or the ActiveState list.
*sigh*
Also.....do any of you have a good working model of the form interface
that I can look at?
The favor of a reply would be appreciated.
TIA,
Bob
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Fri, 04 Jun 1999 15:39:01 GMT
From: tkd_black_belt@my-deja.com
Subject: multiple windows using Perl/Tk
Message-Id: <7j8ruj$g2o$1@nnrp1.deja.com>
Can anyone point me at example(s) of Perl/Tk
applications that have child windows called from
child windows?
A possible application would be a MainWindow ($mw)
that contains summary info. Pressing a button on
$mw would show a Toplevel window ($mycw - designed
based on the DialogBox composite widget).
Pressing another button on $mycw then brings up
another Toplevel window that requests the user to
make a choice, returning the user data back to
$mycw.
Another tangent... Is MDI possible using Perl/Tk?
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Fri, 04 Jun 1999 16:22:35 GMT
From: NukeEmUp@ThePentagon.com (David Cantrell)
Subject: Re: Perl compiler...If or when
Message-Id: <3758fb80.88908443@news.insnet.net>
On 21 May 1999 10:02:25 -0700, Tom Christiansen <tchrist@mox.perl.com>
said:
> [ ranty ranty rant rant ]
In a bad mood, Tom?
[Copying newsgroup posts to me by mail is considered rude]
--
David Cantrell, part-time Unix/perl/SQL/java techie
full-time chef/musician/homebrewer
http://www.ThePentagon.com/NukeEmUp
------------------------------
Date: 04 Jun 1999 10:54:00 +0200
From: kaih=7ICqW50Hw-B@khms.westfalen.de (Kai Henningsen)
Subject: Re: Perl Unicode/Multibyte Support
Message-Id: <7ICqW50Hw-B@khms.westfalen.de>
ilya@math.ohio-state.edu (Ilya Zakharevich) wrote on 02.06.99 in <7j2fqu$fof$1@mathserv.mps.ohio-state.edu>:
> [A complimentary Cc of this posting was sent to Kai Henningsen
> <kaih=7I6cNovHw-B@khms.westfalen.de>],
> who wrote in article <7I6cNovHw-B@khms.westfalen.de>:
> > > > > There is no conversion of any kind. Perl strings are just sequences
> > > > > of small integers. Without `use utf8' small means 0..255. With
> > > > > `use utf8' small means 0..2**36-1. This is the only difference
> > > > > (forgetting about speed and bugs).
>
> > 0..2^31-1 is really all UTF-8 is defined for (that is, the ISO 10646
> > range).
>
> Who cares? I was not discussing iso-shmiso, I was discussing Perl.
Nope. UTF-8 is firmly an ISO animal.
Kai
--
http://www.westfalen.de/private/khms/
"... by God I *KNOW* what this network is for, and you can't have it."
- Russ Allbery (rra@stanford.edu)
------------------------------
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 5887
**************************************
