[15634] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 3047 Volume: 9

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon May 15 06:05:42 2000

Date: Mon, 15 May 2000 03:05:13 -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: <958385113-v9-i3047@ruby.oce.orst.edu>
Content-Type: text

Perl-Users Digest           Mon, 15 May 2000     Volume: 9 Number: 3047

Today's topics:
    Re: Access from several Perl-Scripts on one variable? <billy@arnis-bsl.com>
        Annoying -w messages from standard distributed modules <johnlin@chttl.com.tw>
    Re: Any body know how I access serial ports(unix) <gellyfish@gellyfish.com>
    Re: chat refresh <gellyfish@gellyfish.com>
    Re: concurrent variable names <nospam@devnull.com>
    Re: DBD::ODBC error <enders@mail.sub.uni-goettingen.de>
    Re: Directory Help in perl <gellyfish@gellyfish.com>
        directory okay <danielxx@bart.nl>
    Re: directory okay <danielxx@bart.nl>
        Embedding plain text in HTML chris2037@my-deja.com
    Re: files <webmaster@linkworm.com>
    Re: Forms with Perl <duxbury@kentmere23.freeserve.co.uk>
    Re: Getopt::Long : use of uninitialized value (Johan Vromans)
        How to find distances? smnayeem@my-deja.com
    Re: How to find distances? <gellyfish@gellyfish.com>
    Re: How to replace "\" , HELP! <webmaster@linkworm.com>
    Re: How to replace "\" , HELP! <webmaster@linkworm.com>
        HTML corruption from perl script gelliot8@my-deja.com
    Re: interface with NetLedger XML interface <webmaster@linkworm.com>
    Re: Location of Dictionaries, Encyclopadias and public  <gellyfish@gellyfish.com>
    Re: Newbie on Perl/CGI, which editor is the best on NT? <gellyfish@gellyfish.com>
        Opening corresponding files in two directories chris2037@my-deja.com
    Re: Opening corresponding files in two directories <webmaster@linkworm.com>
    Re: Opening corresponding files in two directories chris2037@my-deja.com
        Perl ps2html <evilbeaver.picksoft@NOSPAMzext.net>
        problem with .pm files not in lib dir <jwijman@interplein.nl>
    Re: Problem with server scripting <gellyfish@gellyfish.com>
        Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)

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

Date: Mon, 15 May 2000 09:32:20 GMT
From: Ilja <billy@arnis-bsl.com>
Subject: Re: Access from several Perl-Scripts on one variable?
Message-Id: <8fog74$lqb$1@nnrp1.deja.com>

In article <01be9e56$a0d767c0$c9bb06d5@unbekanb>,
  "Thorsten" <thorsten_kuske@gmx.net> wrote:
> Is it possible to access from several Perl-Scripts on one variable?
>
> I would be really glad if you could answer me that question and how to do
> so, because this would mean to me to save several hours of work.
>

I guess you are speaking about sharing a variable between two or more
processes (Perl scripts) running at the same time. You may do this with
shared memory.

Try IPC::Shareable or IPC::ShareLite modules.

Hope this helps.

Ilja.



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


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

Date: Mon, 15 May 2000 15:45:52 +0800
From: "John Lin" <johnlin@chttl.com.tw>
Subject: Annoying -w messages from standard distributed modules
Message-Id: <8foa08$6qf@netnews.hinet.net>

Dear all,

Nightmares since I upgraded into Perl5.6 because I have
kept struggling with strange warning messages.


Environment:  WinNT4.0 + ActivePerl5.6

C:\> perl -w -MWin32::OLE::Const="Microsoft Word"

I got 15 lines of the same warning messages:

Constant subroutine emptyenum redefined
at D:/Perl/site/lib/Win32/OLE/Const.pm line 65535.

Hey, D:/Perl/site/lib/Win32/OLE/Const.pm has only 187 lines.
Last time I got another error reported at DBD::Oracle line 0.
Line 0?  Yes.

Since the warnings are carped from standard distributed modules,
it is inappropriate for us to modify the source code to fix it.

Then, can we ask for a -w option that shuts up those carps from
other modules we use, and just warn the errors in our own code?

no warnings 'use';

Thank you.

John Lin

P.S:  Does anyone else get the same error message as I?
If no, maybe that's only my own problem.





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

Date: 15 May 2000 07:08:00 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Any body know how I access serial ports(unix)
Message-Id: <8fo480$ddl$1@orpheus.gellyfish.com>

On Sun, 14 May 2000 22:21:44 +1000 Stephen Lohning wrote:
> Does any body how how I can access serial ports on a linux
> Redhat 5.2 machine.
> Which CPAN module should I look for?

I would look at the module Device::SerialPort in the first instance.

/J\
-- 
I promised my boy one simple thing: lots of riches, and that man broke
my promise!
-- 
fortune oscar homer


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

Date: 14 May 2000 20:34:13 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: chat refresh
Message-Id: <8fmv3l$4uq$1@orpheus.gellyfish.com>

On Mon, 15 May 2000 00:02:56 +0900 sang wrote:
> Hi alls
> 
> I am developing a chat room with perl.
> It is slow when i use refresh , is there another way
> to chat?
> 

Pick up the phone.

/J\
-- 
What do we need a psychiatrist for? We know our kid is nuts.
-- 
fortune oscar homer


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

Date: 15 May 2000 08:01:34 GMT
From: The WebDragon <nospam@devnull.com>
Subject: Re: concurrent variable names
Message-Id: <8foasu$fqi$0@216.155.33.49>

Reply One:

 | I'd say check what modules they're using, make sure you've got the most 
 | recent versions of those modules (if it's in your power).  Check the server 

since it's all running locally from MacPerl under the WebSharing control panel I 
have complete control over the modules, and yes the few that I'm using are all 
very current. CGI and File::Spec are the extent of it. 

Also there are no server error logs since it's just the WebSharing control 
panel.. and since it crashes me all the way out to MacsBug when I try and access 
these two scripts simultaneously (even if they are already pre-loaded before I 
open the index.html frameset), there really isn't much opportunity for one to be 
created even so.  

 | error logs, from my limited experience they give much better explanations of 
 | the problem than what the browser tells you.  If you run both scripts from 
 | the comand line at the same time do you still get error messages. 

Each script runs perfectly by itself with no errors. It is only when both are 
accessed at the same time via a frameset.html file that the error occurs. 

Both scripts are very small as well. <150 lines each. 

 | -- 
 | Cheers
 | Steve              email mailto:sjlen@ndirect.co.uk

-=-
Reply Two:
 | >I have two scripts, which when run concurrently via an index.htm frameset, 
 | >crash macsbug rather horribly. 
 | >
 | >use strict IS in force in BOTH scripts, so I don't think it's namespace 
 | >pollution. hard to tell .. gonna play with it some more.. not exactly sure 
 | >what's going on here.

 | The names of variables in 2 separate programs (even 2 instances of the same 
 | program) have no relationship to each other.
 | 
 | That cannot be the cause of your problem.
 | 
 | Move on to the next windmill  :-)

okay, thanks .. I'll keep that in mind as I continue to try and resolve this.

-- 
send mail to mactech (at) webdragon (dot) net instead of the above address. 
this is to prevent spamming. e-mail reply-to's have been altered 
to prevent scan software from extracting my address for the purpose 
of spamming me, which I hate with a passion bordering on obsession.  


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

Date: Mon, 15 May 2000 09:46:02 +0100
From: Markus Enders <enders@mail.sub.uni-goettingen.de>
Subject: Re: DBD::ODBC error
Message-Id: <391FB94A.DF59141A@mail.sub.uni-goettingen.de>

Hi Chris,

Chris Williams wrote:
 
> my $dbh = DBI->connect("dbi:ODBC:driver=Microsoft Access Driver
> (*.mdb);dbq=\\\\A\\Test.mdb");

ODBC is an interface which gives you access to different data sources.
Which data sources can be accessed if defined in the ODBC-panel on your
computer (at least on NT, - probably it's the same on Win2K).
You give a name to each data source. The name of the data source is,
what you must specify here. Not the use of the Access Driver. This is
done in the ODBC panel.
Also the file, in which access saves all the data must not be pointed
to. This is also done in the ODBC panel.


> So basically, of the hundreds of variations I tried, I can only conclude
> that I am missing something (

Jepp, you have a false understanding of ODBC. Have a look at the panel,
read some documentation.

Perl / your Perl script will never know, what database it will connect
to, when you use ODBC. It could be mysql, oracle, db2 or access... For
your perl script it's all the same (almost).

Ciao
Markus


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

Date: Mon, 15 May 2000 09:31:24 GMT
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Directory Help in perl
Message-Id: <MtPT4.1282$Kc1.185400@news.dircon.co.uk>

On 14 May 2000 18:00:33 -0700, Lon Stowell Wrote:
> In article <uNFT4.5360$f12.125938@news1.rdc1.on.wave.home.com>,
> Julian L. Cardarelli <jc@juliancardarelli.com> wrote:
>>Use this code:
>>
>>----------------------------------------------------------------------------
>>----
>>
>>#!/usr/bin/perl
>>
>>use strict;
>>
>>my @files;
>>my $dir         =       ".";
>>
>>opendir DIR, "$dir";
>>map     { push @files, $_ if (-f "$dir/$_") } readdir(DIR);
>>print join("\n", @files);
>>
>>---------------------------------------------------------------------------
>>
>>The code will push filenames onto @files if the file test operator (-f)
>>returns true. Remove the print and fool around with it a bit to fit your own
>>needs.
> 
> 
>     Is there any limit to the number of file names this would
>     handle?  Have PERL 4, 5, and even 5.6 available on solaris.

Available memory is the only limit.

> 
>     I need to run through a huge directory and construct a list
>     of filenames to be used as arguments to another function. 
>     Roughly 32K files...which so far has overflowed.    
>     Not quite ready yet to simply bust it up into 10k chunks,
>     seems the cowards way out. 
> 

You mean you get 'Out of memory!' ?  I would be surprised with that few
files. However if you are copying the list of files as the arguments of
a function you are probably using more memory than you need to - perhaps
you ought to try passing a reference to the array to the subroutine instead.

/J\


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

Date: Mon, 15 May 2000 09:13:13 GMT
From: "Daniel van den Oord" <danielxx@bart.nl>
Subject: directory okay
Message-Id: <JcPT4.1667$Kk2.18468@Typhoon.bART.nl>

okay I got this far nice and functioning I wanted to add the cgi.pm to be
used for using a parameter if I do that everythin like size and time just
doesn't work anymore ?!?

#!c:\perl\bin\perl

$curdir = "c:\Inetpub";
$namev = "cgi-bin";
header();

opendir DH, "$curdir/$namev"  or die "Can't open: $!";
my @entries = readdir DH;
closedir DH;

foreach my $entry (map "$_", @entries){
  lstat $entry;
  my $time = scalar localtime((stat(_))[9]);
  my $size = -s _;
  if ($size eq 0) {
    $description = "directory";
  }
  else { $description = "mp3";}
  print <<HTML2;
  <tr>
    <td width="25%">$entry</td>
    <td width="25%">$size</td>
    <td width="25%">$time</td>
    <td width="25%">$description</td>
  </tr>
HTML2
}
footer();

sub header(){
print <<HTML1;
<html><head><title>Directory</title></head>
<body>

<table border="1" width="100%" cellspacing="0" cellpadding="0"
bordercolor="#000000">
  <tr>
    <td width="25%" bgcolor="#0000FF" align="center"><font
color="#FFFFFF"><b>Filename</b></font></td>
    <td width="25%" bgcolor="#0000FF" align="center"><font
color="#FFFFFF"><b>Size</b></font></td>
    <td width="25%" bgcolor="#0000FF" align="center"><font
color="#FFFFFF"><b>Date</b></font></td>
    <td width="25%" bgcolor="#0000FF" align="center"><font
color="#FFFFFF"><b>Description</b></font></td>
  </tr>
HTML1
}

sub footer(){
print <<HTML3;
</table>
</body></html>
HTML3
}

Daniel van den Oord      ( Daniel304 RTCL )
----------------------------------------------------------------------
It's nice to be important, but it's more important to be nice
See there be good bye bye
----------------------------------------------------------------------
Daniel304rt ResearchTriangle Community Leader
http://www.geocities.com/ResearchTriangle/Forum/5577




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

Date: Mon, 15 May 2000 09:25:56 GMT
From: "Daniel van den Oord" <danielxx@bart.nl>
Subject: Re: directory okay
Message-Id: <EoPT4.1669$Kk2.18533@Typhoon.bART.nl>

no not the cgi.pm is the problem.. when I change to another directory where
the script is not located it will stop displaying the size and time !!




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

Date: Mon, 15 May 2000 09:48:53 GMT
From: chris2037@my-deja.com
Subject: Embedding plain text in HTML
Message-Id: <8foh62$mi4$1@nnrp1.deja.com>

If I have a plain text file like so:

kkdhjwjnhd
dfpoiwerfwefriwfdff
wneqopeeqmv/fvs
109rfv////a//a/a/a/
 .
 .
 .
and I want to put these in an html file, how should I do that? Actually
these are lines of output from a for loop. I couldn't get it to work
with:

open(FH, ">/somefile.html");
print FH "<!doc......snip snip snip...
	for loop;
</html>";
close (FH);

So I thought it might be easier if I generate the output first then try
to turn it into html somehow! Is this a bad move?

I have tried the <include /somefile.txt> but didn't help.


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


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

Date: Mon, 15 May 2000 01:29:57 -0700
From: "LinkWorm Software, Inc." <webmaster@linkworm.com>
Subject: Re: files
Message-Id: <391FB585.DC5288B6@linkworm.com>

> Daniel van den Oord wrote:
> 
> Is there some easy way of getting filesize / filetype and those things
> ???

<SNIP>

Please don't post in HTML. NG's are better suited for text format.
Finally, there are certain things you can do/check. Read the Perl Docs
and help files, they even have links in the HTML formatted help/FAQ
files that will display the very question you asked here, all you have
to do, is click on the link. And, as nice as it is, it will help you
with other things as well, so you know to do that next time too. :-)
-- 
Regards,
Tim Greer: tech@linkworm.com | LinkWorm Software http://www.linkworm.com
Tel: 530 247-1749. Programming, CGI, Perl, C/C++, ASP, SQL, more. Design
Web Server & Network Administration, Security, Consulting, Installations
Configuration. Unix/Linux/FreeBSD & NT. Apache, IIS, TCP/IP, LAN/WAN/WWW


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

Date: Mon, 15 May 2000 09:26:38 +0100
From: "Ian" <duxbury@kentmere23.freeserve.co.uk>
Subject: Re: Forms with Perl
Message-Id: <8foc9e$15l$1@newsg2.svr.pol.co.uk>

Thanks for the help. I'm running Apache. I will try these parameters.Ta.
David Efflandt <efflandt@xnet.com> wrote in message
news:slrn8hv6h6.6vo.efflandt@efflandt.xnet.com...
> On Sun, 14 May 2000, Ian <duxbury@kentmere23.freeserve.co.uk> wrote:
> >This debugging seems really complicated. Is there no easy way around. I
> >copied the code from a website so you may have got the impression that I
> >know more than I actually do.
> >
> >I skimmed through the pages of debugging but I can't seem to find
anything
> >relating to (offline mode: enter name=value pairs on standard input) what
> >ever this is. Any more suggestions. Cheers.
>
> This allows you to test a Perl script using CGI.pm by entering parameters
> on the commandline if you are not running it on a webserver.  Example:
>
> (offline mode: enter name=value pairs on standard input)
> name=Bob
> city=London
>
> Then hit Ctrl-D to run the script with those params.
>
> Perhaps you should install a webserver if you want to test it with your
> browser.  There is PWS on the Win98 CD (or in NT Option Pack 4 for Win95)
> if you are writing for a IIS server.  Otherwise you may find the Win32
> version of Apache useful:  http://www.apache.org/
>
> --
> David Efflandt  efflandt@xnet.com  http://www.de-srv.com/
> http://www.autox.chicago.il.us/  http://www.berniesfloral.net/
> http://hammer.prohosting.com/~cgi-wiz/  http://cgi-help.virtualave.net/
>




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

Date: 15 May 2000 09:41:45 +0200
From: JVromans@Squirrel.nl (Johan Vromans)
Subject: Re: Getopt::Long : use of uninitialized value
Message-Id: <wl3itwg1cqu.fsf@plume.nl.compuware.com>

tmohr@schleim.qwe.de (Torsten Mohr) writes:

> Thank you for your fast answer,
> 
> i use Getopt::Long in a script i use in the office where i
> can't install new modules.  The last date of modification
> is somewhere in Oct 1996.  Instead of "Configure" i clear
> $Getopt::Long::ignorecase by hand.

You can always install modules in a private library.
What's the fun in fixing your bug if you cannot / want not install a
new version.

-- Johan


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

Date: Mon, 15 May 2000 07:15:56 GMT
From: smnayeem@my-deja.com
Subject: How to find distances?
Message-Id: <8fo873$cii$1@nnrp1.deja.com>

I need a module in perl so that I can find the distance between two
different places. Does anyone know of any module or know where I can
find one??

I would really appreciate any help as I am totally stuck on a project
because of the distances problem. (Even if someone knows where I can
get the data, ie the distance between places I can make a module and
give it to the perl community for others to use)

Thanks in advance.

Nayeem
(please send a copy of the reply to my email smnayeem@agni.com)



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


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

Date: Mon, 15 May 2000 08:48:54 GMT
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: How to find distances?
Message-Id: <WROT4.1279$Kc1.184697@news.dircon.co.uk>

On Mon, 15 May 2000 07:15:56 GMT, smnayeem@my-deja.com Wrote:
> I need a module in perl so that I can find the distance between two
> different places. Does anyone know of any module or know where I can
> find one??

You might have a look at 

      <http://www.perl.com/reference/query.cgi?geographical>

To get the latitude and longitude.  Then the rest is simple trigonometry.

/J\


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

Date: Mon, 15 May 2000 01:47:37 -0700
From: "LinkWorm Software, Inc." <webmaster@linkworm.com>
Subject: Re: How to replace "\" , HELP!
Message-Id: <391FB9A9.711A3938@linkworm.com>

Murvin Ming-Wai Lai wrote:
> 

<SNIP>

When you upload a file via a CGI script, it only uploads the file, not
the path. The path on their local machine has no impact or relevance on
the remote web server. Further, the file name won't contain a back
slashes anyway, Windows won't allow it. I fail to understand your
dilemma...
-- 
Regards,
Tim Greer: tech@linkworm.com | LinkWorm Software http://www.linkworm.com
Tel: 530 247-1749. Programming, CGI, Perl, C/C++, ASP, SQL, more. Design
Web Server & Network Administration, Security, Consulting, Installations
Configuration. Unix/Linux/FreeBSD & NT. Apache, IIS, TCP/IP, LAN/WAN/WWW


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

Date: Mon, 15 May 2000 01:53:16 -0700
From: "LinkWorm Software, Inc." <webmaster@linkworm.com>
Subject: Re: How to replace "\" , HELP!
Message-Id: <391FBAFC.A6648BCB@linkworm.com>

Murvin Ming-Wai Lai wrote:
> 
> Hi all,
>   Thanks for your help.
>   The reason I ask the back slash problem is that I have a html page which
> will upload the file & run the perl script.  Since, in Windows, the input
> file name from the page always looks like this: "C:\Directory\File", and I
> have no control on the \ , I face some difficulties to extract the file
> name from this input string.
>   Well, actually, after I read all the response, I come up an idea.  That
> is I write a javascript (for the html page) that will change all the \ to
> / when submit.  I don't know whether it is possible or not.  I will try
> this.  Of course, I'm also looking for other alternatives too. ( This is a
> way to learn =) ).
> 
>   Thank you for all the helps.
> 
> --
> .........................................................................
> *>>>>Murvin Lai<<<<     >>>>--Muffin--<<<<     email: murvin_lai@sfu.ca *
> *homepage:           http://www.sfu.ca/~mmlai              mmlai@sfu.ca *
> `````````````````````````````````````````````````````````````````````````

You don't need to replace the user's local system's path. That will be
the path to the file they selected to upload, that is the point. Do you
allow people to type in the directory path the file is to be uploaded in
on the remote system or something? Maybe I don't understand your
problem?
-- 
Regards,
Tim Greer: tech@linkworm.com | LinkWorm Software http://www.linkworm.com
Tel: 530 247-1749. Programming, CGI, Perl, C/C++, ASP, SQL, more. Design
Web Server & Network Administration, Security, Consulting, Installations
Configuration. Unix/Linux/FreeBSD & NT. Apache, IIS, TCP/IP, LAN/WAN/WWW


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

Date: Mon, 15 May 2000 09:31:29 GMT
From: gelliot8@my-deja.com
Subject: HTML corruption from perl script
Message-Id: <8fog5h$lq6$1@nnrp1.deja.com>

We are having a problem with a perl script we have written:

When multiple users access my Java web application, the HTML returned
to browsers occasionally becomes corrupted. A user receives  HTML
chunks of his expected page intermingled with HTML belonging to another
user. How can this happen?

The set-up is this:

Client browser requests are directed to a secure Unix webserver running
a Perl CGI script. The script obtains a socket, and sends the query
parameters to a Java application, running on a remote NT server.

The Java application makes database queries (in a separate thread for
each connection) and generates and returns a completed HTML page via
the identified socket as a string using the command:
  outputStreamPerl.write(formObject.toString().getBytes());

The Perl script receives the return string and outputs to the user
using the perl shown below:

----------------------------------------------
#!/usr/local/bin/perl
use CGI qw(:standard);
use CGI::Carp qw(fatalsToBrowser );
#use CGI::Cookie;
use Socket;

#Development Server
my $host = '19.162.32.14';
my $port = '1521';

## this var will handle all the Values
my @values;

## first fill the Form-Para in
##############################

my @keys = param;
foreach (@keys)
{
  push ( @values, [$_,param($_)]);
}

## Connection
#############
my ( $iaddr, $paddr, $proto, $line, $temp);

$iaddr = inet_aton($host);
$paddr = sockaddr_in($port,$iaddr);
$proto = getprotobyname('tcp');

socket(Sock,PF_INET,SOCK_STREAM,$proto);

if (not connect(Sock,$paddr))
{
  print start_html('ERROR');
  print h1('Error connecting to the DDL-Server');
  print "<HR>\n" . "The ErrorMessage was : $!<BR>\n" .
         url(-full=>1,-query=>1)."&_SetID=1   ($SetID)";
}

# Send to the Client
#####################

for $ref (@values)
{
  send Sock, "@$ref[0]=@$ref[1]\n",0;
}
send Sock, "__exit\n",0 ;

# Get the page from the app server
##################################
while ($line = <Sock> )
{
  print $line;
}
close(Sock)	|| die "Socket close: $!";
exit;
-----------------------------------------------

In an attempt to diagnose the problem, debug lines to output the HTML
were added to the Java application (immediately before the "write"
command above) and in the Perl script where return data is received.
The HTML logging in the perl is output to separate files for each
instance of the script for each user.

In a test run, the logging shows that User 1 received all his correct
page but User 2 ALSO received part of the same page embedded in his own
HTML. This problem seems to occur randomly. Most of the time each user
recieves their correct HTML. The logging in the Java app shows the HTML
is sent to the correct stream / url:port but the logging at the other
end of the socket occasionally shows parts of the HTML getting recieved
by the wrong perl instance.

Anyone any ideas?
Can the two streams somehow be using the same socket? Any other ideas??


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


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

Date: Mon, 15 May 2000 01:27:18 -0700
From: "LinkWorm Software, Inc." <webmaster@linkworm.com>
Subject: Re: interface with NetLedger XML interface
Message-Id: <391FB4E6.80C11273@linkworm.com>

toddboyle@my-deja.com wrote:

<SNIP>

> Don't flame me.  I don't work there.

Then why are you SPAMMING for them?

At least consider if your long post had anything to do with _Perl_
before posting it!

<SNIP>

Why is there so much SPAM from deja.com accounts lately? (I mean, more
than usual?)
-- 
Regards,
Tim Greer: tech@linkworm.com | LinkWorm Software http://www.linkworm.com
Tel: 530 247-1749. Programming, CGI, Perl, C/C++, ASP, SQL, more. Design
Web Server & Network Administration, Security, Consulting, Installations
Configuration. Unix/Linux/FreeBSD & NT. Apache, IIS, TCP/IP, LAN/WAN/WWW


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

Date: 15 May 2000 07:13:52 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Location of Dictionaries, Encyclopadias and public domain books in ASCII format on line?
Message-Id: <8fo4j0$ehf$1@orpheus.gellyfish.com>

On Sun, 14 May 2000 02:51:40 -0700 bay wrote:
> I'm interested in developing educational applications that will use
> dictionaries (with definitions not just for spelling), Encyclopedias and
> literature that is in ASCII or RLDBMS formats?
> 
> Will appreciate follow-ups to this post for URL's or Newsgroups for quality
> dictionaries, encyclopedias and literature on line.
> 

I havent the faintest idea what this has to do with Perl but have you
tried <http://www.gutenberg.net>

/J\
-- 
Go ahead and play the blues if it'll make you happy.
-- 
fortune oscar homer


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

Date: 15 May 2000 07:12:13 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Newbie on Perl/CGI, which editor is the best on NT?
Message-Id: <8fo4ft$e7l$1@orpheus.gellyfish.com>

On Sun, 14 May 2000 21:13:18 +0800 Cantonese Boy wrote:
> I have tried visual perl, but it is not a shareware.
> Which perl/CGI editor is better?

There is no such thing as a CGI editor.  I think you want to look at
<http://www.perl.com/reference/query.cgi?editors> before the usual long
and boring thread about peoples preferences in editors starts.

/J\
-- 
I guess some people never change. Or, they quickly change and then
quickly change back.
-- 
fortune oscar homer


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

Date: Mon, 15 May 2000 07:51:20 GMT
From: chris2037@my-deja.com
Subject: Opening corresponding files in two directories
Message-Id: <8foa9k$fsv$1@nnrp1.deja.com>

I have 2 arrays, @array1, and @array2. Each element of the array is a
full path and filename.  I have used fileparse to split the array into 2
sub-arrays, @path1, @filename1. Similarly for @array2.

For each element of array2, I would like to go to a file in array1, if
one exists, open the two files and do some pattern matching.

I have tried associative arrays but can't get it to work, it seems the
pairing in assoc arrays are adjacent. So it seems I have to interleave
the 2 sub-arrays. There has to be a better way. Thanks for your help.




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


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

Date: Mon, 15 May 2000 01:41:32 -0700
From: "LinkWorm Software, Inc." <webmaster@linkworm.com>
Subject: Re: Opening corresponding files in two directories
Message-Id: <391FB83C.FED91209@linkworm.com>

chris2037@my-deja.com wrote:
> 
> I have 2 arrays, @array1, and @array2. Each element of the array is a
> full path and filename.  I have used fileparse to split the array into 2
> sub-arrays, @path1, @filename1. Similarly for @array2.
> 
> For each element of array2, I would like to go to a file in array1, if
> one exists, open the two files and do some pattern matching.
> 
> I have tried associative arrays but can't get it to work, it seems the
> pairing in assoc arrays are adjacent. So it seems I have to interleave
> the 2 sub-arrays. There has to be a better way. Thanks for your help.
> 
> Sent via Deja.com http://www.deja.com/
> Before you buy.

A hash _should_ work fine... perhaps you can provide the relevant code
to be better assisted in finding your problem?
-- 
Regards,
Tim Greer: tech@linkworm.com | LinkWorm Software http://www.linkworm.com
Tel: 530 247-1749. Programming, CGI, Perl, C/C++, ASP, SQL, more. Design
Web Server & Network Administration, Security, Consulting, Installations
Configuration. Unix/Linux/FreeBSD & NT. Apache, IIS, TCP/IP, LAN/WAN/WWW


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

Date: Mon, 15 May 2000 08:54:23 GMT
From: chris2037@my-deja.com
Subject: Re: Opening corresponding files in two directories
Message-Id: <8fodvp$jg0$1@nnrp1.deja.com>

Problem solved. Thanks anyways.


In article <8foa9k$fsv$1@nnrp1.deja.com>,
  chris2037@my-deja.com wrote:
> I have 2 arrays, @array1, and @array2. Each element of the array is a
> full path and filename.  I have used fileparse to split the array into
2
> sub-arrays, @path1, @filename1. Similarly for @array2.
>
> For each element of array2, I would like to go to a file in array1, if
> one exists, open the two files and do some pattern matching.
>
> I have tried associative arrays but can't get it to work, it seems the
> pairing in assoc arrays are adjacent. So it seems I have to interleave
> the 2 sub-arrays. There has to be a better way. Thanks for your help.
>
> Sent via Deja.com http://www.deja.com/
> Before you buy.
>


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


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

Date: Mon, 15 May 2000 07:38:59 GMT
From: "The Evil Beaver" <evilbeaver.picksoft@NOSPAMzext.net>
Subject: Perl ps2html
Message-Id: <nQNT4.26451$Kv2.215090@quark.idirect.com>

By any chance is there a Perl script that will convert a PostScript file to
a series of HTML files? If so, could someone please URL me?

--
Christopher S. Charabaruk (EvilBeaver) <evilbeaver.picksoft@NOSPAMzext.net>
BlakLight Software <http://picksoft.zext.net/>







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

Date: Mon, 15 May 2000 10:03:31 GMT
From: Jarl Wijman <jwijman@interplein.nl>
Subject: problem with .pm files not in lib dir
Message-Id: <391FCB1B.408B30A7@interplein.nl>

<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
Hi,
<p>i downloaded a forum, built with perl and mysql.
<br>works perfectly on linux, on NT in encounter a problem
<br>tho.
<p>the directory with perl script files also contain 5
<br>perl modules, and on NT the forum is unable to
<br>find them. it claims it only searches in perl/lib and
<br>perl/site/lib
<p>is this a problem on NT or can i change some setting
<br>so perl will look for perl modules in the local dir first?
<p>thanks a lot in advance,
<p>Jarl</html>



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

Date: 15 May 2000 08:13:06 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Problem with server scripting
Message-Id: <8fo822$pth$1@orpheus.gellyfish.com>

On Sat, 13 May 2000 14:09:12 -0800 a56dragon wrote:
>
> # security - don't allow SSIs or comment lines
> $pair =~ s/<!--(.|\n)*-->//g;
> 

I keep seeing this.  Surely *any* input could be considered a security
risk depending on how it is used :

  # security - dont allow user input as we might be stupid enough to
  # use it in a dangerous way.
  $pair =~ s/.*//g;

Server Side Include tags or HTML comments can't do anything to a Perl
program at all of course and if you are likely to use this input in
a context that could cause problems then you should take responsibility
to sanitize the data depending on the context it is to be used which
is likely to be different if you're going to use this as a filename or
display it in HTML or pass it as arguments to 'mkfs'.

It should not be the responsibility of the parsing code to sanitize the
data as it has no way of knowing what you are going to do with it.  It is
a function of the application code to do this.  CGI.pm doesnt make any
attempt to clean the data in this way it should be noted.

/J\
-- 
Friendship is far more tragic than love. It lasts longer.
-- 
fortune oscar homer


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

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 3047
**************************************


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