[12257] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 5857 Volume: 8

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jun 2 06:07:28 1999

Date: Wed, 2 Jun 99 03:00:22 -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           Wed, 2 Jun 1999     Volume: 8 Number: 5857

Today's topics:
    Re: anyone want to help a beginner? <mattfree@hardlink.com>
        Can't load module DBI, dynamic loading not available in <bakulin@eximb.kiev.ua>
        Cannot install msql/mysql module <mat.nieuwenhoven@icl.nl>
    Re: definition of public domain <nospam.schlafly@cruzio.com>
    Re: empty line <tony@emailcyberscape.net>
    Re: GD, PPM, XML: Parser <matt-news@sergeant.org>
    Re: How do you print a file backwards by line? (Larry Rosler)
    Re: How do you print a file backwards by line? <uri@sysarch.com>
    Re: How to list all installed modules <uri@sysarch.com>
    Re: List lvalues and do - parser idiosyncrasy <B.A.McCauley@bham.ac.uk>
        LWP::UserAgent and URL redirect... (GEMINI)
    Re: Nesting an if inside a for each loop (There are no visible exits.)
        Newbie - what do I need to run Perl scripts on our webs <steve.bright@capgemini.co.uk>
    Re: passing Perl <--> C arguments <michiel.verhoef@wkap.nl>
    Re: Perl Unicode/Multibyte Support (Ilya Zakharevich)
        perldebug: visibility of local (private) variables <thomas.wilde@hl.siemens.de>
        Post Method <axc@iname.com>
        test <trevor@cbcu.cam.ac.uk>
    Re: Time Error (Larry Rosler)
    Re: undesired result with .* in s command (Ilya Zakharevich)
        unix newbie <hkasten@abm-soft.de>
    Re: unix newbie <hove@ido.phys.ntnu.no>
    Re: use File::Copy; my  $my_dir = "C:/";chdir($my_dir)  <bakulin@eximb.kiev.ua>
    Re: What's wrong with this hit counter? <matt-news@sergeant.org>
        Win32 NetShareGetInfo <trevor@cbcu.cam.ac.uk>
        Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)

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

Date: Tue, 1 Jun 1999 23:39:42 -0700
From: "Matt" <mattfree@hardlink.com>
Subject: Re: anyone want to help a beginner?
Message-Id: <7j2jcm$3qhs$1@newssvr04-int.news.prodigy.com>

>
>>     my(%data) = &parseURL($ENV{QUERY_STRING});
>
>Why aren't you using a thoroughly-debugged module to deal with your CGI
>parameters? That looks to be your first mistake. It's a touch tricky to
>get it right, and this subroutine doesn't.


yeah, i've been meaning to look into that.  good advice.  that's the next
thing.


>>     open (TEMPLATE, "$data{template}") ||
>
>Does this mean that you'll let remote users read your /etc/passwd file
>over the web? I'd recommend that you plug this security hole!

yipes!  thanks for the heads up Tom.  well don't i feel silly.
fyi i changed it to this the moment i got the message, so the path and file
extention are hard coded

open (TEMPLATE, "../madlibs/$data{template}.html") ||

>Well, that's enough to get you started. Good luck!

thanks!

-Matt




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

Date: Wed,  2 Jun 1999 08:25:57 +0300
From: "Boris Bakulin" <bakulin@eximb.kiev.ua>
Subject: Can't load module DBI, dynamic loading not available in this perl.
Message-Id: <2.07b3.1JMMR.FCOPR9@eximb.kiev.ua>

I install modul DBI-1.08

perl Makefile.PL
make
make test
make install

Everything was good, but when i use
#!/usr/local/bin/perl -w
use IO::Socket;
use DBI;


answer is:

Can't load module DBI, dynamic loading not available in this perl.
  (You may need to build a new perl executable which either supports
  dynamic loading or has the DBI module statically linked into it.)
 at /usr/local/lib/perl5/site_perl/5.005/i386-sco_sv/DBI.pm line 150
BEGIN failed--compilation aborted at
/usr/local/lib/perl5/site_perl/5.005/i386-s
co_sv/DBI.pm line 150.


Any idies


Boris




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

Date: Wed, 02 Jun 1999 09:19:50 +0200
From: Mat Nieuwenhoven <mat.nieuwenhoven@icl.nl>
Subject: Cannot install msql/mysql module
Message-Id: <3754DB15.882E352B@icl.nl>

Hi all,

I'm trying to install the msql/mysql Perl module
on OS/2. Perl makefile.pl goes fine (after a
small mod to the makefile.pl), but when I run
make I get an error that file errmsg.h is
missing. It doesn't seem to be part of the perl
source. Where is this file to be found, or more
importantly, what don't I have installed so that
is isn't on my system? I have installed several
other modules (e.g Data::Dumper) with no
problems.

Any ideas are greatly appreciated!

Thanks, Mat Nieuwenhoven


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

Date: Wed, 2 Jun 1999 00:42:09 -0700
From: "Roger Schlafly" <nospam.schlafly@cruzio.com>
Subject: Re: definition of public domain
Message-Id: <7j2n4n$b77$1@nntp6.atl.mindspring.net>

>A public-domain program is one upon which the author
>has deliberately surrendered his copyright rights.

A better definition of public domain software is software that
can be copied and used without any legal restrictions.

Public domain software is not copyrighted, but must also
be free from patent, trademark, and trade secret restrictions.

Occasionally works enter the public domain without a deliberate
action on the part of the author. (Eg, a copyright expires.)





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

Date: Wed, 2 Jun 1999 09:51:32 +0100
From: "Tony Kenny" <tony@emailcyberscape.net>
Subject: Re: empty line
Message-Id: <928313571.25592.0.nnrp-06.c2de1237@news.demon.co.uk>

HELO

I wouls probably use "\n" as you rightly guessed.  You may want to consider
wether there will ALWAYS be that empty line.  Could you use something else
to distinguish the questions?  Maybe Q1: Q2:  ?

If the format of this file WILL always have the blank line then I would
maybe read the whole file in and split it into an array thus:

#read whole file into a single variable

(@questions) = split /\n\n/,$filecontents;

Then you should have all your questions in individual elements of the array.

I've not tested this, hope it works for you,

Tony




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

Date: Wed, 02 Jun 1999 10:08:01 +0100
From: Matt Sergeant <matt-news@sergeant.org>
Subject: Re: GD, PPM, XML: Parser
Message-Id: <3754F471.574D3626@sergeant.org>

David Cooper wrote:
> 
> Hello
> 
> I've installed ActiveState build 517.
> When I use PPM to install GD (or anything else for that matter) I get the
> following error:
> 
> no element found at line 1, column 0, byte -1 at
> C:/Perl/site/lib/XML/Parser.pm
> line 153

I think this means your ppm.xml file is either missing, empty, or
broken. You might need to re-install ActivePerl to get it working again
:(

Matt.


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

Date: Tue, 1 Jun 1999 22:15:40 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: How do you print a file backwards by line?
Message-Id: <MPG.11be5dc0540f5f30989b53@nntp.hpl.hp.com>

[Posted and a courtesy copy mailed.]

In article <3754A229.24C1FD81@incaic.engr.sgi.com> on Tue, 01 Jun 1999 
20:16:57 -0700, Edwin Salgado <inca@incaic.engr.sgi.com> says...
> Is it possible to print a file backwards line by line?

Yes.

 ...
> while (<FILE>) {
> 	if (/<--a regular expression-->/) {
> 		print FILEB $_;  # this is where I want to print in reverse order.
> 	}
> }

No chance of doing it that way.  You are trying to print lines you don't 
have yet.

One way is to read the entire file into memory (assuming it fits), and 
reverse it:

    print FILEB reverse <FILEA>;

 ...
> I couldn't find anything in O'Reilly's "Programming Perl" or
> "Perl Cookbook".

Recipe 8.4 in The Perl Cookbook.
 
> Any suggestions?

See also the module File::Backwards by Uri Guttman.  But if the file 
isn't too large, just ise the 'reverse' approach shown above.

-- 
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com


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

Date: 02 Jun 1999 02:55:34 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: How do you print a file backwards by line?
Message-Id: <x7n1yjccrd.fsf@home.sysarch.com>

>>>>> "LR" == Larry Rosler <lr@hpl.hp.com> writes:

  LR> See also the module File::Backwards by Uri Guttman.  But if the file 
  LR> isn't too large, just ise the 'reverse' approach shown above.

i haven't posted it to cpan yet. i have to cpan package it and get the
name ok'ed by the cpan gods. but i see semi-regular requests for it so i
should get that done. when it is on cpan then this becomes an faq!

uri

-- 
Uri Guttman  -----------------  SYStems ARCHitecture and Software Engineering
uri@sysarch.com  ---------------------------  Perl, Internet, UNIX Consulting
Have Perl, Will Travel  -----------------------------  http://www.sysarch.com
The Best Search Engine on the Net -------------  http://www.northernlight.com


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

Date: 02 Jun 1999 02:22:24 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: How to list all installed modules
Message-Id: <x7pv3fcean.fsf@home.sysarch.com>

>>>>> "TP" == Tom Phoenix <rootbeer@redcat.com> writes:

  TP> On Tue, 1 Jun 1999, Jasmine wrote:
  >> Is there a way to determine all of the modules that are installed on
  >> my hosts installation of perl?

  TP> There are a number of methods, none perfect, each with potential
  TP> shortcomings, limitations, exclusions, or even possible false
  TP> positives or false negatives. You may therefore choose to use one
  TP> or a combination of several methods. Here are a few ideas for your
  TP> consideration, illumination, and amusement.

<snip 1 - 6>

7. use tom c.'s pmtools kit which has many useful programs for managing
   perl modules. i am not sure of the url but it should be easy to find
   at perl.com or tom's site. interestingly enough, i can't find the
   home url in the actual src tree of pmtools 1.0! that should be fixed
   tom!

uri

-- 
Uri Guttman  -----------------  SYStems ARCHitecture and Software Engineering
uri@sysarch.com  ---------------------------  Perl, Internet, UNIX Consulting
Have Perl, Will Travel  -----------------------------  http://www.sysarch.com
The Best Search Engine on the Net -------------  http://www.northernlight.com


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

Date: 02 Jun 1999 10:33:53 +0100
From: Brian McCauley <B.A.McCauley@bham.ac.uk>
Subject: Re: List lvalues and do - parser idiosyncrasy
Message-Id: <u9so8bymim.fsf@wcl-l.bham.ac.uk>

Brian McCauley <B.A.McCauley@bham.ac.uk> writes:

> Is this bug or what?
> 
> ( do { @a } ) = ("x","y");
> 
> Error: Can't modify array deref in scalar assignment
> 
> Why is this seen as a scalar assignment?

I've had a look in the parser and there is clearly code in there which
seems to have no purpose but to create the idiosyncrasy.

I also noticed the case of ?: handling.

( $x ? $a : $b ) = @foo;

Is treated as scalar assignment exactly as though you'd done:

$x ? $a : $b = @foo;

To get list assignment semantics you need to use:

$x ? ( $a ) : ( $b ) = @foo;

I think this is too patahlogically eclectic even for Perl to allow to
pass without waring:

( $x ? $a : $b ) = @foo;
Warning: Parenthises arround conditional scalar lvalue do not make
list assignment.

As for the case of the do{} lvalue I think it would be sufficiently
unlikely to occur in existing code that we could safely fix it.
Failing that I'd like to see at least a warning.

-- 
     \\   ( )  No male bovine  | Email: B.A.McCauley@bham.ac.uk
  .  _\\__[oo   faeces from    | Phones: +44 121 471 3789 (home)
 .__/  \\ /\@  /~)  /~[   /\/[ |   +44 121 627 2173 (voice) 2175 (fax)
 .  l___\\    /~~) /~~[  /   [ | PGP-fp: D7 03 2A 4B D8 3A 05 37...
  # ll  l\\  ~~~~ ~   ~ ~    ~ | http://www.wcl.bham.ac.uk/~bam/
 ###LL  LL\\ (Brian McCauley)  |


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

Date: 2 Jun 1999 05:34:08 GMT
From: dennis@info4.csie.nctu.edu.tw (GEMINI)
Subject: LWP::UserAgent and URL redirect...
Message-Id: <7j2fog$2va$1@netnews.csie.NCTU.edu.tw>

I use LWP::UserAgent to request
a document from a URL. The response
is sometimes a redirect message:

_rc=302
_msg=Moved Temporarily

headers:
expires=Mon, 01 Feb 1999 08:00:00 GMT
client-warning=Redirect loop detected
title=Object moved
cache-control=private
set-cookie=sessionId= .....
client-peer=....
x-cache=....
location=....

I found that when I use MSIE 4.0 to browse the page, the browser
will not report 302 Error, but automatically redirect to the correct
page according to location in header (I guess).
So I am wondering if the LWP::UserAgent can also redirect automatically.

By the way, the response headers including "set-cookie", and 
what should I treat it for the next request??
Thanks.


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

Date: 2 Jun 1999 06:35:32 GMT
From: mhannine@news.abo.fi (There are no visible exits.)
Subject: Re: Nesting an if inside a for each loop
Message-Id: <7j2jbk$k8b@josie.abo.fi>

George Jempty (jb4mt@hotmail.com) wrote:
: I'm an experienced programmer, but new to Perl.  Can someone please explain
: what's wrong with the syntax of the following code:
: 
: for each $address (@ip_addresses)              {
:   if $address eq $ENV{'REMOTE_ADDR'}    {
:     print "stuff I want to print";
:   }
: }
: 
: Without the if construct this works fine.
: 
: Hope this is not deemed inappropriate for this group.
: 
: George Jempty

Try "foreach" (_one_ word)
(I guess that one is a prime candidate for perl's "Did you mean so and so...?"
error messages, right up there with "else if")

	Mika

-- 
mhannine@abo.fi
"Childbirth is NOT a miracle.  Life is NOT sacred.  When you have twenty
 thousand nomads huddled between two rivers in the Middle East and that's it
 for Homo sapiens, when one in five children is a live birth, one in ten
 living past the age of ten, THEN childbirth IS a miracle and life IS sacred.
 When the average age of a grandmother in Philadelphia's housing projects is
 twenty-five, to call childbirth a miracle is at least a tasteless joke and at
 worst a true obscenity."
				- Dave Sim, from Cerebus #142


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

Date: Wed, 2 Jun 1999 10:45:36 +0100
From: "Steve B" <steve.bright@capgemini.co.uk>
Subject: Newbie - what do I need to run Perl scripts on our webserver......
Message-Id: <7j2ug2$rsf$1@taliesin.netcom.net.uk>

Sorry about this....

I need to run a couple of simple perl scripts on our server....what I don't
know is how to go about it..

do I need to install any software on our server before they will run ???

and if so where can I get it from ????

--
Cheers

Steve Bright

steve.bright@capgemini.co.uk





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

Date: Wed, 02 Jun 1999 11:06:26 +0200
From: Michiel Verhoef <michiel.verhoef@wkap.nl>
Subject: Re: passing Perl <--> C arguments
Message-Id: <3754F412.D8844F65@wkap.nl>

Hi,

Try perldoc perlembed. Otherwise "Advanced Perl Programming" (O'Reilly)
contains
a chapter on embedding C in Perl and vice versa as well...

HTH,

Michiel


jj wrote:

> Hi all,
> I've to connect 2 CGIs, one written in C and the other in Perl.
>
> How can I pass some arguments from one to another, from Perl to C and
> viceversa?
>
> I mean, I must pass these arguments as URL encoded (just like a web page
> sends them) but I am NOT sure what's the way and what're the exact
> instructions both in Perl or C. My problem is not to get the arguments but
> passing them... how?
>
> I've read a lot of documentation about but I've still NOT found the clue.
>
> Thanks a lot
> jj (jj@dpi.es)



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

Date: 2 Jun 1999 05:35:26 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Perl Unicode/Multibyte Support
Message-Id: <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.

Ilya


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

Date: Wed, 02 Jun 1999 11:34:40 +0200
From: Thomas_Wilde <thomas.wilde@hl.siemens.de>
Subject: perldebug: visibility of local (private) variables
Message-Id: <3754FAB0.2EB488F6@hl.siemens.de>

I want to observe some local variables defined with my() in a
subroutine. The first lines look as follows:

sub find_subjects {
    my ($filename,
	%hash_of_boundaries,
	$boundary,
	@subject_array);

    $filename = shift;
   
At this point I'd expect that $filename has a value that I can access
with the debugger command: 

DB<some_line> X filename

But I can't.  
(...BIG SILENCE...)

A trace with 

DB<some_line> T

tells me:
@ = main::find_subjects('/home/wilde/nsmail/TEST') called from file
`show_subjects' line 26

@_ obviously holds '/home/wilde/nsmail/TEST' and so should (and does,
since this routine works) $filename after the 'shift'. 

Why can't I see it?

To make things more confuse I _can_ see the values of
'%hash_of_boundaries', which was declared with 'my' as well. 

When later values are added to this associative array, a:

DB<some_line> x %hash_of_boundaries

tells me:

0  '------------B83691E653CD7F9410F27EA3'
1  1

which is what I expect to see.

Any idea what I do wrong with the scalar $filename?

Thanks in advance,

Thomas


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

Date: Wed, 2 Jun 1999 11:50:47 -0700
From: "Alex" <axc@iname.com>
Subject: Post Method
Message-Id: <7j2rc3$kjb$1@news.kolumbus.fi>

Hi

Im programming proxy server in Perl and I have problems with browsers using
Geos 3.0.
Problem occures when Client is sending POST request to proxy.
With Netscape & IE its work fine ---means proxy will receive heades and body
of request.
With Geos it will receive only headers and no "Body"

Below is log from what I get.

Netscape query
-----------------------------------------------------------------
POST http://info.tietovalta.fi/tivaweb.nsf/Search?SearchView&P=1 HTTP/1.0
Referer: http://info.tietovalta.fi/tivaweb.nsf/pages/7000?Open&P=1
Proxy-Connection: Keep-Alive
User-Agent: Mozilla/4.5 [en] (Win98; I)
Host: info.tietovalta.fi
Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, image/png, */*
Accept-Encoding: gzip
Accept-Language: en
Accept-Charset: iso-8859-1,*,utf-8
Content-type: application/x-www-form-urlencoded
Content-length: 9

Query=aap

-----------------------------------------------------------------
Nokia Communicator Query (Using Geos 3.0)
------------------------------------------------------------------
POST http://info.tietovalta.fi/tivaweb.nsf/Search?SearchView&P=1 HTTP/1.1
Host: info.tietovalta.fi:80
Connection: close
Accept: text/plain, text/html, image/gif,
image/jpeg,application/x-nokia-9000-communicator-add-on-software, */*
User-Agent: Nokia-Communicator-WWW-Browser/3.0 (Geos 3.0 Nokia-9110)
Content-Type: application/x-www-form-urlencoded
Content-Length: 9

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

As you see here is no "body" included still there is Content-Length and
CRLF(\r\n).
My program will wait bzzzzz that the body should follow, and finally timing
out.

Can somebody advice what Im doing(thinking) wrong here.


Generally my program will first records all Headers.
If content length is not 0 it will look for \r\n (CRLF).
If found, then starting from next line it should find the body.
It will recording body until recorded length is bigger or equal to the
content-length.
As you saw above that system is good enought for Mozilla browsers but not
for Geos.

Any Ideas?

Regards Alex









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

Date: Wed, 02 Jun 1999 10:11:28 +0100
From: Trevor Crisp <trevor@cbcu.cam.ac.uk>
Subject: test
Message-Id: <3754F540.667A0400@cbcu.cam.ac.uk>

test



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

Date: Tue, 1 Jun 1999 21:54:23 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Time Error
Message-Id: <MPG.11be58cac492397d989b52@nntp.hpl.hp.com>

In article <x77lpne320.fsf@home.sysarch.com> on 01 Jun 1999 22:42:15 -
0400, Uri Guttman <uri@sysarch.com> says...
> >>>>> "BJ" == Bill Jones <bill@fccj.org> writes:
>   BJ> $year += 1900; # Damn, there goes Y2k again...
> 
>   BJ> The time is $hour:$min$sec and
>                             ^
> missing :
> 
> boy, was that broken!! don't post broken and untested code!
> 
> :-)

More seriously, it doesn't zero-pad the numbers, which the original 
poster went to great pains to do.  So this needs s?printf to be correct.

-- 
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com


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

Date: 2 Jun 1999 05:43:42 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: undesired result with .* in s command
Message-Id: <7j2gae$fsi$1@mathserv.mps.ohio-state.edu>

[A complimentary Cc of this posting was sent to Ronald J Kimball
<rjk@linguist.dartmouth.edu>],
who wrote in article <1dsqxac.16x2xiigl4ua8N@p229.block1.tc6.state.ma.tiac.com>:

> .*? finds the shortest possible _leftmost_ match.  A subtle distinction,
> but an important one, that often catches people unawares.

This bears no relationship to RExen (unless you discuss a REx
consisting of 3 chars .*? only, and in this particular case your
description is too long - .*? matches nothing at the leftmost possible
position).

Correct description is not that easy to state - which does not mean
that prolifiration of uncorrect ones will help anybody.  It involves
ordering of possible matches, and combination rules: how to get an
ordered list for AB, A|B, A*, A*? etc given the ordered lists for A
and B.

Ilya


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

Date: Wed, 2 Jun 1999 09:16:31 +0200
From: "Holger Kasten" <hkasten@abm-soft.de>
Subject: unix newbie
Message-Id: <7j2loh$4j2$1@black.news.nacamar.net>

sorry, i know that is not the 100% right group for that

i'm a newbie and i did some eperimental things with perl scripts and
 .htaccess. my problem is now, i have a directory, which looks empte (ls),
but if i try rm, rm means that it isnt.

how can i solve this problem (it doesnt help to call rm to delete directory
 with contents).

ist there a special way to see hidden files (i dont see all .ht... files,
but
i know they exist)

thank you for help





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

Date: 02 Jun 1999 09:45:48 +0200
From: Joakim Hove <hove@ido.phys.ntnu.no>
Subject: Re: unix newbie
Message-Id: <k0nyai3dp03.fsf@ido.phys.ntnu.no>

"Holger Kasten" <hkasten@abm-soft.de> writes:

> ist there a special way to see hidden files (i dont see all .ht... files,
> but
> i know they exist)

Well, there are at least two different options to ls which can help
you achieve this. Try "man ls" at the command prompt.

Joakim
-- 
=== Joakim Hove    www.phys.ntnu.no/~hove/     ======================
# Institutt for fysikk  (735) 93637 / 352 GF  |  Skoyensgate 10D    #
# N - 7034 Trondheim    hove@phys.ntnu.no     |  N - 7030 Trondheim #
=====================================================================


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

Date: Wed,  2 Jun 1999 08:00:00 +0300
From: "Boris Bakulin" <bakulin@eximb.kiev.ua>
Subject: Re: use File::Copy; my  $my_dir = "C:/";chdir($my_dir) || die   "Can't change directory! $!"; From Unix I want to read DOS directory
Message-Id: <2.07b3.8NT.FCOOK0@eximb.kiev.ua>

In <374e95f5.0@nntp.mmi.org> Dave Evans (devans@radius-retail.kom) wrote:
Sorry that question didn't make a whole lot of sense to me.  Nor anybody
else, judging by the lack of posted responses.

What exactly are you trying to do?

Boris Bakulin wrote in message <2.07b3.QEEH.FCFG7E@eximb.kiev.ua>...
>I read FAQ but didn't find answer
>
>If anybody can help ,please
>
>Boris
>
>

Some detailes : I want to read DOS files from SCO UNIX




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

Date: Wed, 02 Jun 1999 09:54:29 +0100
From: Matt Sergeant <matt-news@sergeant.org>
Subject: Re: What's wrong with this hit counter?
Message-Id: <3754F145.A741A26F@sergeant.org>

Greg Bacon wrote:
> 
> In article <3753C475.EA3A96E6@sergeant.org>,
>         Matt Sergeant <matt-news@sergeant.org> writes:
> : In the argument I mailed directly back to Randall, I stated that a dumb
> : counter is useless, however modern counters like fxweb's provide much
> : more detail.
> 
> This would seem to suggest that "modern counters" are something other
> than useless.  I deny this claim.

OK. That's your right. Hope you don't mind if I continue this (kindof
off topic) thread...

> : The result of RELOAD RELOAD RELOAD etc is the same on your
> : web server's log as it is to a hit counter.
> 
> Wrong.  Most counters say something like "There have been X visitors
> to this site".  Do I magically become two people by visiting the
> same website more than once in some period?

Mine says: "Hits since 30th October 1998: ". Not visitors, not people.
Just hits. Same as an access log. I made a mistake in my original email
on this thread saying "20,000 people have hit my perl page" - but it was
followed by a smiley - did these suddenly stop indicating
scarcasm/humour on the internet, and I missed the cutoff date?

> : So - do you also advocate
> : not doing any log analysis? I don't think so - I've seen articles by
> : both Randall and Lincoln Stein about log analysis, so I'm not sure of
> : why they are so against people without access logs doing log analysis
> : (albeit in a limited way).
> 
> Straw man.  Log files record hits.  Visitor counters purport to count
> visitors, but they cannot.

Err... what if you call it a "hit counter"? I'm not holding a straw man
argument here - you're arguing wording.

> : FXWeb's counter provides info about repeat
> : visits (via persistent cookies),
> 
> Hmm.. I disable cookies in my browser.  What about browsers that don't
> support cookies?  What about a Unix machine from which several people
> will visit a particular site?

Fine. So I don't find out if you visit the site twice. I'd have as much
difficulty with an access log if you use: Junkbuster, a proxy server, or
any other type of web access munger. BFD. So I don't get that info. You
don't get it from log analysis either, but that is a part of the web
master's job. Are you telling Lincoln Stein that doing log analysis is
hopeless because of these factors? I doubt it.

> : browser breakdown, OS breakdown and
> : country of origin.
> 
> This still doesn't count unique visitors.

I'm counting hits. And repeat visitors from people who enable cookies
and don't use munging. That's what I'd be counting from log analysis
too. Although a log analysis would be a little more detailed.

> : So meaningless only applies to meaningless counters. More meaningfull
> : counters do exist and should be used if you don't have access to a
> : server log.
> 
> Access to the server logs still won't let one count unique visitors,
> so they're still meaningless.  Hit counters are meaningless because
> they can be artificially inflated.

So can access logs. But their analysis is an important part of running a
web site.

Matt.


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

Date: Wed, 02 Jun 1999 10:17:10 +0100
From: Trevor Crisp <trevor@cbcu.cam.ac.uk>
Subject: Win32 NetShareGetInfo
Message-Id: <3754F696.2BAC132A@cbcu.cam.ac.uk>

Perl Newbie in need of help!!!! ;-)
=====================

Under WindowsNT4, a script is needed to create a home folder for a
particular user.  This folder needs to be shared and need permission
modification.

A script has been written that creates the folder and also shares it.
How do you retrieve and view the share info with NetShareGetInfo?

How do you modify the share and security permissions with Win32
functions in a perl script?  How do you retrieve and view this info as
well?

Thanks in advance!


Trevor Crisp





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

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

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