[19121] in Perl-Users-Digest
Perl-Users Digest, Issue: 1316 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Jul 17 11:05:56 2001
Date: Tue, 17 Jul 2001 08:05:09 -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: <995382309-v10-i1316@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Tue, 17 Jul 2001 Volume: 10 Number: 1316
Today's topics:
Re: a NEEDED error-chk removed between 5.6.0 and 5.6.1? (Anno Siegel)
Re: about image::Magick quality. <shijialee@yahoo.com>
Re: Any method to create stable threads in Perl on win (Rocco Caputo)
Re: Check for Dups! <millettNOSPAM@lblueyonder.co.uk>
Re: Colored quotes in Html <a.v.a@home.nl>
Re: Colored quotes in Html (Tad McClellan)
Email (John Almberg)
Re: error making Archive::Zip (Gururaj Upadhye)
FAQ: How can I use X or Tk with Perl? <faq@denver.pm.org>
Re: HELP WITH PERLDAP!!!!!!!!! <dbusby3@slb.com>
Re: HELP WITH PERLDAP!!!!!!!!! (Merijn Broeren)
Re: hiding user/password while connecting to FTP site - <axel.ulrich@swpc.siemens.com>
Re: hiding user/password while connecting to FTP site - <flavell@mail.cern.ch>
Re: hiding user/password while connecting to FTP site (Rene Nyffenegger)
How do I enable an Appleshare IP server? <a.downie@dundee.ac.uk>
Re: how many bytes to read from socket? (Kevin Reid)
Re: Including flock in code while developing in Windows <m.grimshaw@salford.ac.uk>
Iterating Nested Hashes <acbell@iastate.edu>
Re: Iterating Nested Hashes <jmccrea@guideguide.com>
Re: Iterating Nested Hashes <mjcarman@home.com>
Looking for a data tables application <hanan_cohen@yahoo.com>
Perl or PHP? <mjericho.nospam@gmx.net>
Premature End of Script Headers <joe.lindquist@usa.alcatel.com>
read the 9th column (Alexvalara)
Re: read the 9th column (Alexvalara)
Re: read the 9th column (Rafael Garcia-Suarez)
Re: read the 9th column (Alexvalara)
Urgent Help Req. Plz <ub98aa@brocku.ca>
Re: Urgent Help Req. Plz <tore@extend.no>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 17 Jul 2001 10:16:32 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: a NEEDED error-chk removed between 5.6.0 and 5.6.1?
Message-Id: <9j13a0$d0p$1@mamenchi.zrz.TU-Berlin.DE>
According to David Combs <dkcombs@panix.com>:
> For this code (note missing "$" on gPriorLine-assignment):
>
> ...
> # ----- Start myGetLine() stuff:
> our $gPriorLine = our $gCurLine = "";
> our $gSawEOF = 0;
> our $gLinesReadSoFar = 0;
>
>
> sub myGetLine {
> gPriorLine = $gCurLine; # <<====== MISSING "$" IS HERE <<====
>
> if (! defined($gCurLine = <>)) {
> $gSawEOF = 1; return undef };
> ...
>
> ---------------------------------------------
>
> When running 5.6.0 (on panix.com's netbsd),
> I *do* get notified of my goofup:
>
> perl5.6.0 -w find-email-coming-via-netcom.pl
> Can't modify constant item in scalar assignment at
> find-email-coming-via-netcom.pl line 21, near "$gCurLine;"
> BEGIN not safe after errors--compilation aborted at
> find-email-coming-via-netcom.pl line 49.
> >
>
>
> , whereas on 5.6.1 (sparc5, solaris 7)
>
> it says NOTHING about the error! Just runs (and runs
> OK, too!)
That is because in 5.6.1 a subroutine can return an lvalue. If
gPriorLine were such a subroutine, the line might be perfectly
fine.
I don't know about running okay, that would indicate that
myGetLine is never called. Otherwise Perl would have complained
about an undefined subroutine.
> ---------------------------------------------
>
> QUESTION: What'd it do with that "bareword",
> stick (prepend) the dollar-sign anyway, as a nice
> "favor" to me?
It didn't stick in a "$", if anything it stuck in an "&".
Anno
------------------------------
Date: Tue, 17 Jul 2001 14:33:22 GMT
From: "James" <shijialee@yahoo.com>
Subject: Re: about image::Magick quality.
Message-Id: <S0Y47.200336$Mf5.55065454@news3.rdc1.on.home.com>
No. by reading the doc (http://www.imagemagick.org/www/perl.html) quote
"For convenience, methods Write, Display, and Animate can take any parameter
that SetAttribute knows about "
So what i am doing is correct, i guess.
what do u mean by saying " Subs using the named parameters via hash scheme
will usually silently ignore params which they dont expect." ? can u adress
in detail? by the way, the resize is done w/out any problem. just the
quality always remain the same which is i want to adjust.
James
"Malte Ubl" <ubl@schaffhausen.de> wrote in message
news:3B540FEF.2A923C54@schaffhausen.de...
> James schrieb:
>
> > i am trying to resize image and lower the quality in order to make a
> > thumbnail.i am expecially dealing with JPEG file now.My problem is the
> > quality of the image seems not to be effected no matter what number i
set
> > for the quality. Such as i have a JPEG file 555x740 93.3k. after
resizing,
> > size to be 6.84k no matter what quality i set. Why?
> > code is like this:
>
> > $test->Write(quality=>'50',filename=>'copy.jpg');
>
> Just by quickly looking at the docs, quality seems to be a paramater
> you give to the method "Set" not "Write". Subs using the named parameters
> via hash scheme will usually silently ignore params which they dont
expect.
> Love it or hate it.
>
> ->malte
------------------------------
Date: 16 Jul 2001 18:06:09 GMT
From: troc@netrus.net (Rocco Caputo)
Subject: Re: Any method to create stable threads in Perl on win 9x platforms?
Message-Id: <slrn9l6b8g.2d1.troc@eyrie.homenet>
On Mon, 16 Jul 2001 10:24:30 +0530, \
Emmanuel E <shashanka.sj@in.bosch.com> wrote:
>
>i want to know whether there is a stable way of runnung multithreaded
>programs in perl on win 9x. the fork command is very crash prone. is
>there any way to acess underlying win 32 dlls to create threads that can
>communicate with each other?
It depends. What do you want the threads to do? If it's socket I/O,
POE will handle the multi-connection grunge work for you, even on
Windows.
-- Rocco Caputo / troc@netrus.net / poe.perl.org / poe.sourceforge.net
------------------------------
Date: Tue, 17 Jul 2001 10:15:47 GMT
From: "millside" <millettNOSPAM@lblueyonder.co.uk>
Subject: Re: Check for Dups!
Message-Id: <nfU47.5529$FC5.657825@news1.cableinet.net>
<snip>
> >> I need to use a flat file as it's shared with other programs.
>
> > That's not a compelling reason, you can lock a database as well.
>
> I assume he meant that the other programs were written to read a flat file
Thats correct!
> and that he didn't want to have to, or couldn't, rewrite them to use a
> tied hash instead (maybe they're not even his programs).
>
Yes they are mine. I have an admin program which uses the file and three
more programs which use it from two different sites. I Only have the problem
of users submitting addresses more than once., all my other error checks
work ok. It would be too much hassle to change all at this stage.
Thanks for your help.
--
millside
_____________
------------------------------
Date: Tue, 17 Jul 2001 11:32:19 GMT
From: AvA <a.v.a@home.nl>
Subject: Re: Colored quotes in Html
Message-Id: <3B542509.2482EBF6@home.nl>
* Tong * wrote:
> Hi,
>
> Can you give me some suggestion on how to produce the colored mail
> quotations in Html pages, just like what the google news is doing?
>
> Any tips on the algorithm or points on the web is welcome. Thanks.
>
> --
A simple search on Google gave me back 368,000 hits on the subject
of colored html text.
------------------------------
Date: Tue, 17 Jul 2001 07:32:53 -0400
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Colored quotes in Html
Message-Id: <slrn9l88j5.8op.tadmc@tadmc26.august.net>
* Tong * <sun_tong@users.sourceforge.net> wrote:
>
>Can you give me some suggestion on how to produce the colored mail
>quotations in Html pages, just like what the google news is doing?
The answer to the Perl part of your question:
You use print() to make output.
What output should be made will be the same regardless of the
programming language used, and so is off-topic in a programming
language-specific newsgroup.
Try the HTML newsgroup for HTML questions.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 17 Jul 2001 06:17:21 -0700
From: jalmberg@identry.com (John Almberg)
Subject: Email
Message-Id: <c396bdba.0107170517.5d751b3d@posting.google.com>
I am writing a perl script to send email to all our subscribers. The email
is a multipart/alternative containing both plain text and HTML versions. No
problem generating or sending the mail. I got the whole program working &
debugged, tested using Outlook, Yahoo, Hotmail, Pine, etc.. Worked great!
Full of confidence, I sent a few test mails to Outlook, unplugged my laptop,
and walked down to the marketing guy to show him the results.
To my surprise, all of the test emails showed up as completely blank pages
in Outlook as long as my laptop wasn't connnected to the net. After thinking
about this overnight, I am surprised that the images (just a few, small
ones) aren't cached, and even more surprised that Outlook doesn't render the
plain old HTML. In fact, I'm staring at a couple of HTML emails (from other
people) which behave that way when my machine is off-line: Outlook renders
the HTML okay, and leaves spacers for the graphics it can't fetch from the
net.
Any ideas what I'm doing wrong? And does anyone know of a newsgroup devoted
to email issues? Ever since I've started working on this project, I've
realized that email readers are even less standardized than browsers and it
is really tricky to get mail to render properly in multiple readers.
Thanks in advance for any help!
John
------------------------------
Date: 17 Jul 2001 05:44:17 -0700
From: gururaj@powertec.com (Gururaj Upadhye)
Subject: Re: error making Archive::Zip
Message-Id: <23c54ab6.0107170444.571d819@posting.google.com>
I downloaded the fresh installation package (newer version) and did a
fresh install and tried using the package and it worked!!! Thanks for
the hints ;-)
I am successful in using to generate archive file. I opened using
winzip and I am able to see all the files. It also shows the directory
information (or path information) of the file added. I donot want this
information to come here. What should I be doing for this.
Here is my script. I exports a directory under found in
document_root/export/dir
use Archive::Tar;
use CGI::Apache qw(:standard);;
use CGI::Carp 'fatalsToBrowser';
my $query = new CGI;
my $dir = $query->param('dir');
unless ($dir){
print 'Failed to get directory to export';
exit;
}
my $rootdir = "$ENV{DOCUMENT_ROOT}/export";
my $tar = Archive::Tar->new();
# Open the directory to read
opendir(DIR, "$rootdir/$dir") || warn "Temp dir empty: $dir,$rootdir";
# get the list of files from the directory.
# grep{...} removes the current and previous directory links.
my @filelist = grep {/^[^.]/ && -f "$rootdir/$dir/$_"} readdir (DIR);
# add every file
foreach $file (@filelist)
{
print "$file:$rootdir/$dir/$file \n";
$tar->add_files("$rootdir/$dir/$file");
}
# create the tar file
$tar->write("$rootdir/$dir.tar.gz", 1);
closedir (DIR);
print "$rootdir/$dir.tar.gz should be the exported file\n";
print 'SUCCESS';
------------------------------
Date: Tue, 17 Jul 2001 12:17:02 GMT
From: PerlFAQ Server <faq@denver.pm.org>
Subject: FAQ: How can I use X or Tk with Perl?
Message-Id: <21W47.225$T3.189092864@news.frii.net>
This message is one of several periodic postings to comp.lang.perl.misc
intended to make it easier for perl programmers to find answers to
common questions. The core of this message represents an excerpt
from the documentation provided with every Standard Distribution of
Perl.
+
How can I use X or Tk with Perl?
Tk is a completely Perl-based, object-oriented interface to the Tk
toolkit that doesn't force you to use Tcl just to get at Tk. Sx is an
interface to the Athena Widget set. Both are available from CPAN. See
the directory
http://www.perl.com/CPAN/modules/by-category/08_User_Interfaces/
Invaluable for Perl/Tk programming are the Perl/Tk FAQ at
http://w4.lns.cornell.edu/%7Epvhp/ptk/ptkTOC.html , the Perl/Tk
Reference Guide available at
http://www.perl.com/CPAN-local/authors/Stephen_O_Lidie/ , and the online
manpages at http://www-users.cs.umn.edu/%7Eamundson/perl/perltk/toc.html
.
-
Documents such as this have been called "Answers to Frequently
Asked Questions" or FAQ for short. They represent an important
part of the Usenet tradition. They serve to reduce the volume of
redundant traffic on a news group by providing quality answers to
questions that keep coming up.
If you are some how irritated by seeing these postings you are free
to ignore them or add the sender to your killfile. If you find
errors or other problems with these postings please send corrections
or comments to the posting email address or to the maintainers as
directed in the perlfaq manual page.
Answers to questions about LOTS of stuff, mostly not related to
Perl, can be found by pointing your news client to
news:news.answers
or to the many thousands of other useful Usenet news groups.
Note that the FAQ text posted by this server may have been modified
from that distributed in the stable Perl release. It may have been
edited to reflect the additions, changes and corrections provided
by respondents, reviewers, and critics to previous postings of
these FAQ. Complete text of these FAQ are available on request.
The perlfaq manual page contains the following copyright notice.
AUTHOR AND COPYRIGHT
Copyright (c) 1997-1999 Tom Christiansen and Nathan
Torkington. All rights reserved.
This posting is provided in the hope that it will be useful but
does not represent a commitment or contract of any kind on the part
of the contributers, authors or their agents.
03.13
--
This space intentionally left blank
------------------------------
Date: Tue, 17 Jul 2001 05:53:09 -0500
From: David Busby <dbusby3@slb.com>
Subject: Re: HELP WITH PERLDAP!!!!!!!!!
Message-Id: <3B541915.30060F33@slb.com>
That at least did something. Now I get a segmentation fault with core
dump everytime. Any other ideas? I apperciate your help so far.
Eric Bohlman wrote:
> In comp.lang.perl.misc David Busby <dbusby3@slb.com> wrote:
> > I am trying to run perldap on Solaris 2.8 with perl version 5.00404.
>
> > Here is the simple code I have:
>
> > #!/usr/bin/perl
>
> > push(@INC,"/usr/lib/perl5/site_perl/5.005/sun4-solaris");
>
> This takes place at run time.
>
> > print("@INC\n");
>
> > use Mozilla::LDAP::Conn(\%ld);
> > use Mozilla::LDAP::Utils;
>
> Whereas this takes place at compile time.
>
> Change your push to
>
> use lib "/usr/lib/perl5/site_perl/5.005/sun4-solaris";
>
> which takes place at compile time.
------------------------------
Date: 17 Jul 2001 13:07:03 +0200
From: merijnb@iloquent.nl (Merijn Broeren)
Subject: Re: HELP WITH PERLDAP!!!!!!!!!
Message-Id: <9j168n$q8o$1@brugman.iloquent.nl>
On the back of a napkin I noticed written by David Busby <dbusby3@slb.com>:
> That at least did something. Now I get a segmentation fault with core
> dump everytime. Any other ideas? I apperciate your help so far.
>
> > In comp.lang.perl.misc David Busby <dbusby3@slb.com> wrote:
> > > I am trying to run perldap on Solaris 2.8 with perl version 5.00404.
> >
You are talking about 5.00404 here..
> >
> > use lib "/usr/lib/perl5/site_perl/5.005/sun4-solaris";
> >
But that points to a 5.005 version. Bet you there is a 5.004 as well.
Better ofcourse to use 5.00503 anyway.
Cheers,
--
Merijn Broeren | She doesn't want you to understand her. She knows that's
Software Geek | impossible. She just wants you to understand yourself,
| everything else is negotiable.
------------------------------
Date: Tue, 17 Jul 2001 08:47:30 -0400
From: Axel Ulrich <axel.ulrich@swpc.siemens.com>
Subject: Re: hiding user/password while connecting to FTP site - SCP/SFTP
Message-Id: <3B5433E2.7E002EE9@swpc.siemens.com>
David,
Could u give some more details re SCP/SFTP.
Thanks.
Axel
David Coppit wrote:
> And you need to stop using FTP as it sends cleartext passwords over the
> line... Use SCP or SFTP.
>
> David
------------------------------
Date: Tue, 17 Jul 2001 15:24:18 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: hiding user/password while connecting to FTP site - SCP/SFTP
Message-Id: <Pine.LNX.4.30.0107171521020.18861-100000@lxplus003.cern.ch>
On Jul 17, Axel Ulrich jeopardized:
> David,
This is a usenet group...
> Could u give some more details re SCP/SFTP.
Certainly: it's on-topic on comp.security.ssh,
http://www.openssh.com/faq.html is the FAQ for one of the
implementations.
Uebrigens: http://learn.to/quote/ "Wie zitiere ich im Usenet?"
------------------------------
Date: 17 Jul 2001 10:26:42 GMT
From: rene.nyffenegger@gmx.ch (Rene Nyffenegger)
Subject: Re: hiding user/password while connecting to FTP site
Message-Id: <Xns90E16DEB4C31gnuegischgnueg@130.133.1.4>
>one last thing that u can do is to embed the perl script into C and then
>acess the encrypted file
>
>Emmanuel E
What can C do that perl can't regarding encrypted data?
Rene
--
http://www.adp-gmbh.ch/
rene dot nyffenegger at adp-gmbh dot ch
------------------------------
Date: Tue, 17 Jul 2001 14:46:08 +0100
From: Al Downie <a.downie@dundee.ac.uk>
Subject: How do I enable an Appleshare IP server?
Message-Id: <3B5441A1.81C87E4@dundee.ac.uk>
Hi,
I've installed some CGI's on my Appleshare IP server, but when I try
to run them the browser simply displays the script, rather than
executing it. Reading through the docs suggests that my server
doesn't have Perl installed on it. I've checked the MacPerl docs,
and there's no advice about what I need to do at the server end.
I'd be very grateful for any help!
Many thanks in advance,
Al Downie
------------------------------
Date: Tue, 17 Jul 2001 12:45:03 GMT
From: kpreid@attglobal.net (Kevin Reid)
Subject: Re: how many bytes to read from socket?
Message-Id: <1ewkwc6.z0shjwsshuwcN%kpreid@attglobal.net>
Mark McKay <kitfox@kitfox.com> wrote:
(quotes rearranged)
> However, sysread() requires an integer input specifing how many characters
> to read. How would I tell this? Is there some function that says how
> many characters in a socket are waiting to be read (if any)?
sysread() will return as many characters as currently available, or the
number you request, whichever is less.
> I'm trying to create a simple chat server application. I have it mostly
> running, and am using sysread() and syswrite() calls on my sockets to
> keep everything nonblocking.
Note that your program may still block in syswrite(), if you send enough
data at once to fill up the OS's buffers. You might want to look into
using O_NONBLOCK (which will cause syswrite() to return immediately,
telling you how many characters it did write) and maintaining your own
output buffer, which you can retry writing as soon as select() tells you
the socket is ready for writing.
--
Kevin Reid: | Macintosh:
"I'm me." | Think different.
------------------------------
Date: Tue, 17 Jul 2001 14:38:28 +0100
From: Mark Grimshaw <m.grimshaw@salford.ac.uk>
Subject: Re: Including flock in code while developing in Windows for Unix??
Message-Id: <3B543FD4.363CD1C5@salford.ac.uk>
Bart Lateur wrote:
>
> David Coppit wrote:
>
> >Happily Windows can do flock for 5.6.0 versions and better.
>
> AFAIK, NT only. It still barfs on Win9x.
>
> --
> Bart.
I've just done the same thing for a friend of mine: writing (on WinNT
ActiveState) an OOP package that opens/closes and locks database
files/ancilliary files and passing it on to my friend who uses Win98 -
eventually it'll all go on UNIX. Hence I needed to test the operating
system to see whether I can use flock. Given that flock works on
WinNT/2000 but not Win9x and that $^O reports 'MSWin32' on both, is
there any way to tell the two apart from within perl?
------------------------------
Date: Tue, 17 Jul 2001 07:32:54 -0500
From: "Andrew Bell" <acbell@iastate.edu>
Subject: Iterating Nested Hashes
Message-Id: <9j1b9f$vf0$1@news.iastate.edu>
Hi,
Say I have a hash like:
$foo{$a}{$b}{$c}
How do I iterate this? I tried:
while (($key, %hash) = each(%foo))
{
while (($key2, %hash2) = each(%hash))
{
while (($key3, $value) = each(%hash2))
{
}
}
}
The outermost loop worked. The inner loops did not.
Thanks for any help,
-- Andrew Bell
acbell@iastate.edu / andrew.bell@bigfoot.com
Statistics Lab
Iowa State University
(515) 294-0889
------------------------------
Date: Tue, 17 Jul 2001 14:03:55 +0100
From: Jasper McCrea <jmccrea@guideguide.com>
Subject: Re: Iterating Nested Hashes
Message-Id: <3B5437BB.3EA8BF41@guideguide.com>
Andrew Bell wrote:
>
> Hi,
>
> Say I have a hash like:
>
> $foo{$a}{$b}{$c}
>
> How do I iterate this? I tried:
>
> while (($key, %hash) = each(%foo))
> {
> while (($key2, %hash2) = each(%hash))
> {
> while (($key3, $value) = each(%hash2))
> {
> }
> }
> }
>
As far as I know, by looking up a camel 'coz I ain't used it before,
each does not iterate through key hash pairs like you want, but the key
value pairs. The value in this case is a hashref, isn't it?
Maybe if you did
while (($key, $hashref) = each %foo ) {
while (($key2, $hashref2) = each %$hashref) {
etc..
that might work.
foreach my $key1 (keys %foo) {
foreach my $key2 ( keys %{ $foo{$key} } ) {
foreach my $key3 ( keys %{ ${ $foo{$key} }{$key2} } ) {
etc..
_should_ work, in exactly the same way, but it's slightly more explicit
in its explanation, and what I would tend to use.
Jasper
> The outermost loop worked. The inner loops did not.
>
> Thanks for any help,
>
> -- Andrew Bell
> acbell@iastate.edu / andrew.bell@bigfoot.com
> Statistics Lab
> Iowa State University
> (515) 294-0889
--
split//,'019617511192'.
'17011111610114101114'.
'21011141011840799901'.
'17101174';
foreach(0..
$#_){$_[$_
++]^=$_[$_
--]^=$_[$_
]^=$_[++ $_]if!($_%
2)}$g.=$_ ,chr($g)=~
/(\w)/&&($o.=$1and
$g='')foreach@_;
print"$o\n"
------------------------------
Date: Tue, 17 Jul 2001 08:32:44 -0500
From: Michael Carman <mjcarman@home.com>
Subject: Re: Iterating Nested Hashes
Message-Id: <3B543E7C.4B9EBB1C@home.com>
Andrew Bell wrote:
>
> Say I have a hash like:
>
> $foo{$a}{$b}{$c}
>
> How do I iterate this? I tried:
>
> while (($key, %hash) = each(%foo))
[snip]
Hash values must be scalars, not other hashes. Perl emulates nested data
structures by using references. See the perlref and perlreftut manpages.
The typical idiom to iterate over your nested hash is this:
foreach my $key1 (keys %foo) {
foreach my $key2 (keys %{$foo{$key1}}) {
foreach my $key3 (%{$foo{$key1}{$key2}}) {
# do something with $foo{$key1}{$key2}{$key3}
}
}
}
But if you want to keep yours, that's fine, just fix the error:
while (my ($k1, $v1) = each %foo) {
while (my ($k2, $v2) = each %$v1) {
while (my ($k3, $v3) = each %$v2) {
# do something...
}
}
}
> The outermost loop worked. The inner loops did not.
No it didn't, but you didn't know that because you apparently didn't
have warnings enabled. You should *always* have warnings enabled. If you
had them, Perl would have given you a hint that you were doing something
wrong:
Odd number of elements in hash assignment at foo.pl line 15.
-mjc
------------------------------
Date: Tue, 17 Jul 2001 12:03:59 +0200
From: Hanan Cohen <hanan_cohen@yahoo.com>
Subject: Looking for a data tables application
Message-Id: <3B540D8F.690751D0@yahoo.com>
Hello
I am looking for a system that will enable users to create data tables
using a web interface.
The creator will be able to define the titles and format of the columns
and then enter information to the data tables.
Then, the readers of the data tables will be able to view the content of
the data table and perform searches on the table.
All processes should be done using a web interface to eliminate the
intervention of a programmer/webmaster.
I would greatly appreciate any pointers to such a system, if you know of
one.
Thanks
--
Hanan Cohen - http://www.info.org.il
***Love and Peace***
------------------------------
Date: Wed, 18 Jul 2001 00:08:06 +0930
From: "Martin Jericho" <mjericho.nospam@gmx.net>
Subject: Perl or PHP?
Message-Id: <9j1io0$lifem$1@ID-15346.news.dfncis.de>
Two questions:
1. What are the main differences/advantages between perl and PHP? As I
understand it, PHP is used inline in HTML and perl is purely a CGI language.
In that case, what is the advantage of perl over PHP?
2. What is the difference between c.l perl.misc, alt.perl and
alt.comp.perlcgi.freelance?
Thanks
------------------------------
Date: Tue, 17 Jul 2001 09:19:22 -0500
From: "Joe Lindquist" <joe.lindquist@usa.alcatel.com>
Subject: Premature End of Script Headers
Message-Id: <9j1hhb$e74$1@auds955.usa.alcatel.com>
I am running into this error repeatedly in executing several cgi scripts. I
have referenced apache, and active state's FAQs, which have helped somewhat.
My cgis still occasionally still yield this error after I rearrange the
outputted HTML. I am using:
print <<EOHTML;
...
EOHTML
and have tried embedding the http header inside of this, as well as outside.
This has fixed a few of my scripts, however it has been useless on others.
I have also attempted to use the $| special variable to buffer / non-buffer
the output to no avail. Also, the script compiles and executes fine at the
command prompt. I am running Apache 1.3.2, and ActiveState's ActivePerl 5
Thanks,
Joe Lindquist
------------------------------
Date: 17 Jul 2001 10:08:28 GMT
From: alexvalara@aol.com (Alexvalara)
Subject: read the 9th column
Message-Id: <20010717060828.17594.00004473@ng-bh1.aol.com>
Hi all
i am using ls and after that i am trying to read the 9th column of the line (is
coming from ls!)
($file)
------------------------------
Date: 17 Jul 2001 10:16:21 GMT
From: alexvalara@aol.com (Alexvalara)
Subject: Re: read the 9th column
Message-Id: <20010717061621.17572.00004937@ng-bh1.aol.com>
>
Sorry mistake....i continue...
Hi all
i am using ls and after that i am trying to read the 9th column of the line
(is
coming from ls!)
i am trying to store the content of the 9th column using:
($file)=($linefromls=~/(?:\s+){9}(.+)/);
but it doesn't work
Any help?
Thanks in advance
Alexandros
------------------------------
Date: 17 Jul 2001 10:13:43 GMT
From: rgarciasuarez@free.fr (Rafael Garcia-Suarez)
Subject: Re: read the 9th column
Message-Id: <slrn9l83vn.p2c.rgarciasuarez@rafael.kazibao.net>
Alexvalara wrote in comp.lang.perl.misc:
} Hi all
} i am using ls and after that i am trying to read the 9th column of the line (is
} coming from ls!)
} ($file)
Perl one-liner solution :
ls -l | perl -lpe '$_=(split)[8]'
Classic shell solution :
ls -l | awk '{ print $9 }'
And if your ls understands the -1 switch :
ls -1
--
Rafael Garcia-Suarez / http://rgarciasuarez.free.fr/
------------------------------
Date: 17 Jul 2001 10:30:56 GMT
From: alexvalara@aol.com (Alexvalara)
Subject: Re: read the 9th column
Message-Id: <20010717063056.17594.00004474@ng-bh1.aol.com>
>
>And if your ls understands the -1 switch :
> ls -1
>
Thanks man. It is the think i need.
Alexandros
------------------------------
Date: Tue, 17 Jul 2001 10:27:27 -0400
From: Umair Tariq Bajwa <ub98aa@brocku.ca>
Subject: Urgent Help Req. Plz
Message-Id: <3B544B4F.C69E245F@brocku.ca>
Hi,
I am writing a script so users can change their passwords in password
file using web GUI. In my post section i am executing command like that
...............
system "htpasswd -m filename newuser";
What should I do after that so I can enter user's specified new
password? I just want to simply update the file. Any idea? Any idea will
be greatly appreciated. Thanks in advance.
Umair
------------------------------
Date: Tue, 17 Jul 2001 17:04:43 +0200
From: Tore Aursand <tore@extend.no>
Subject: Re: Urgent Help Req. Plz
Message-Id: <MPG.15be7273a68f65d5989699@news.online.no>
In article <3B544B4F.C69E245F@brocku.ca>, ub98aa@brocku.ca
says...
> system "htpasswd -m filename newuser";
> [...]
Are you sure you want to do it manually? How about taking a
look at the modules for this in the CPAN directory?
--
Tore Aursand - tore@extend.no - www.aursand.no
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V10 Issue 1316
***************************************
