[9105] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 2723 Volume: 8

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue May 26 12:12:26 1998

Date: Tue, 26 May 98 09:00:33 -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           Tue, 26 May 1998     Volume: 8 Number: 2723

Today's topics:
        -e under NT and UNIX (Daniel)
    Re: An unwelcome and undeserved slap <dak@mailhost.neuroinformatik.ruhr-uni-bochum.de>
        Building 5.004 on BSDi ?? <info@hpispmanagement.com>
    Re: c.l.p.misc is `perl support' (was Re: O'Reilly has  <Scott.L.Erickson@HealthPartners.com>
    Re: Clearly define "free software" <upsetter@ziplink.net>
    Re: Copylefting manuals (Stefaan A Eeckels)
    Re: file size with perl and win NT (Vasile CALMATUI)
    Re: GNU attacks on the open software community (Abigail)
    Re: GPL documentation == unspeakable evil birgitt@my-dejanews.com
    Re: Have we got a good free Perl manual? (Tina Marie Holmboe)
    Re: HELP: system() sometimes fails (Dana Trantham)
        How do I get the full pathname of a file? <Kortleven@holmes.nl>
        How to add invisible counter on Web page <pangjo@vincentinc.com>
        Montreal Perl User Group <trot@cam.org>
        Montreal Perl User Group <trot@cam.org>
    Re: MS SQL server and Perl <arturcz@kerigma.cyf.gov.pl>
        Need Help on PERL installation !!! violadawn@my-dejanews.com
    Re: need to do a ftp true a firewall, is someone has a  (Stefaan A Eeckels)
    Re: need to do a ftp true a firewall, is someone has a  <walts@nortel.ca>
        NT Utilities with Perl <cshupp@entergy.com>
    Re: O'Reilly has helped promote the acceptance of Perl (/\oo/\ the original)
        Online Message from PERL to WIN95 <9435697@ml.petech.ac.za>
    Re: Perl terminology bwb@acm.org
        PGP::Pipe (Pipe.pm) troubles <mroeser@removethis.gte.net>
        press "enter" key to leave ( C. H. Chen)
        Problem reading large files under Win95 (Vasile CALMATUI)
    Re: Problems with system command in perl (Dana Trantham)
        run-time require issues (Thomas Frederick O'Connell)
        Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)

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

Date: 26 May 1998 14:30:44 GMT
From: daniel.mendyke@digital.com (Daniel)
Subject: -e under NT and UNIX
Message-Id: <6kejmk$vmp$1@nntpd.lkg.dec.com>


I need to verify the existence of a file.
My script must run under both NT and UNIX.
I've used 

 &IsThere() if -e $fileName;

But because $fileName is '/tmp/images/thing.gif'
NT can't find it.

Is there a module that converts file names for
OS independence?

 
Daniel Mendyke 
==============================================
daniel@virtualvoices.com
Sell it OnLine at http://www.virtualvoices.com
==============================================



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

Date: 26 May 1998 15:30:20 +0200
From: David Kastrup <dak@mailhost.neuroinformatik.ruhr-uni-bochum.de>
Subject: Re: An unwelcome and undeserved slap
Message-Id: <m2k97940sz.fsf@mailhost.neuroinformatik.ruhr-uni-bochum.de>

tzs@halcyon.com (Tim Smith) writes:

> Rodger Donaldson <rodgerd@ihug.co.nz> wrote:
> >Well, you might as well call it GNU/Netscape/XFree86/A variety of authors and
> >organisations who have contributed code/Linux.  And start referring to
> >GNU-FreeBSD, too.
> 
> When they try to call it a GNU system, it does not refer to who wrote
> the code.  Rather, the FSF has their ideal of what they want in a
> system.  Any system that is sufficiently close to this ideal is a GNU
> system, even if none of their code is in it.
> 
> This is similar to saying that something is a POSIX system.

This is not proper FSF-speak.  There is only one true GNU system.
Linux is merely a variant GNU system.


-- 
David Kastrup                                     Phone: +49-234-700-5570
Email: dak@neuroinformatik.ruhr-uni-bochum.de       Fax: +49-234-709-4209
Institut f|r Neuroinformatik, Universitdtsstr. 150, 44780 Bochum, Germany


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

Date: Tue, 26 May 1998 09:31:51 -0600
From: "Jeffrey W. Kehoe" <info@hpispmanagement.com>
Subject: Building 5.004 on BSDi ??
Message-Id: <356AE067.D11BA928@hpispmanagement.com>

Has anyone built perl 5.004 on BSDi??  When I run make, I get the
following error:

doio.c: In function Perl_do_ipcctl:
doio.c:1381: argument #4: incompatible types in argument passing
doio.c:1432: argument #4: incompatible types in argument passing
*** Error code 1

Stop. 

Thanks in advance for the help,
Jeff


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

Date: Tue, 26 May 1998 08:43:12 -0500
From: Scott Erickson <Scott.L.Erickson@HealthPartners.com>
Subject: Re: c.l.p.misc is `perl support' (was Re: O'Reilly has helped promote the acceptance of Perl)
Message-Id: <356AC6F0.67EE35FE@HealthPartners.com>

Russell Schulz wrote:
> 
> Scott Erickson <Scott.L.Erickson@HealthPartners.com> writes:
> 
> > Prior to [the ORA book], they had been opposed to the use of Perl
> > because, it was free and because it was "not supported" (evidently,
> > they do not understand usenet and FAQ's and documentation).
> 
> a. a book is `support'?
> b. usenet is `support'?!
> 
> please clarify.

Some people would like to believe that support can only come from a
person on the other end of a telephone line. However, reading the
documentation, read FAQ's, asking the Usenet community, and reading the
appropiate book's (by O'Reilly and others) are other forms of support.
If by going to the above mentioned sources, a users question is
answered, then they got the support that they needed. The above
mentioned forms of support require a bit more work than calling up tech
support for help. However, if they really need someone to hold their
hand the entire time, well, then, ....

Scott.


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

Date: 26 May 1998 15:36:58 GMT
From: Scratchie <upsetter@ziplink.net>
Subject: Re: Clearly define "free software"
Message-Id: <6keniq$nco@fridge.shore.net>

In comp.lang.perl.misc Klaus.Schilling@home.ivm.de wrote:

: Proprietary software like oracle is immoral. 

This is bizarre beyond words. I'm trying to conceive of what thought
process would lead you to the conclusion that it's immoral to create a
useful product and charge money for it.

--Art

--------------------------------------------------------------------------
                    National Ska & Reggae Calendar
            http://www.ziplink.net/~upsetter/ska/calendar.html
--------------------------------------------------------------------------


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

Date: 26 May 1998 14:04:10 GMT
From: Stefaan.Eeckels@ecc.lu (Stefaan A Eeckels)
Subject: Re: Copylefting manuals
Message-Id: <6kei4q$pq3$1@justus.ecc.lu>

In article <m367it712u.fsf@ehdo.ton.tut.fi>,
	Sami Sandqvist <samiss@cc.tut.fi> writes:
> I work as a programmer. In my country, if not otherwise agreed on, the
> employer gets the copyrights for my code. I can not GPL it.
*All* your code? Even the code you write at home on your own
machine during weekends and holidays? If that's the case, 
then such an employment contract is *evil*.
If that's the default situation provided in the labour laws,
then I'd sue the government before the human rights tribunal
in Strasbourg.

> Would you
> not want to answer my questions about, for example, Perl? Am I evil?
> Do I "refuse to cooperate"?
No, you're not 'evil', and notice that the word wasn't used by
RMS. As usual, his viewpoint is totally coherent. He did say
that it is a difficult question, and that there is a case to
be made for allowing it. 

After all the hullaballoo, RMS's posts were factual, and
moderate. Please don't quote out of context.

-- 
Stefaan
-- 

PGP key available from PGP key servers (http://www.pgp.net/pgpnet/)
___________________________________________________________________
   Williams and Holland's Law:  If enough data is collected,
          anything may be proven by statistical methods.


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

Date: Tue, 26 May 1998 15:10:13 GMT
From: vasile@club-internet.fr (Vasile CALMATUI)
Subject: Re: file size with perl and win NT
Message-Id: <356adaa6.11460019@news.club-internet.fr>

"CompuServe" <jim_lawhon@pagenet.com> wrote:

>Regarding the file sizes...  Are the files that reported the incorrect size
>4GB?  I've seen some apps/tools fail to report the correct file-size on
>files over 4GB.  They would usually report the difference between 4GB and
>the actual file size or nothing at all.  I was told by one person this was a
>bug with a Microsoft API.  Something about not using a large enough integer
>to represent files over 4GB...
>I have not confirmed this however.

Hello

I have also a problem with big files under  Win95.

The problem is that I can read only the first 4-5 Mb from the file (total length is 25 Mb).

It works well by splitting the file in some little files of 4 Mb.

Is this a Perl limitation ? Or Win95 ? On Perl under Win95 ?
Had anybody else this problem ? A solution ?


PS : I'm using Perl for Win32 "normal version" (not ActiveState) version 5.004_02

- -
Vasile Calmatui
vasile@club-internet.fr
http://www.chez.com/vasile/


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

Date: 26 May 1998 14:39:41 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: GNU attacks on the open software community
Message-Id: <6kek7d$q8g$1@client2.news.psi.net>

Jan Vroonhof <vroonhof@frege.math.ethz.ch> wrote:
++ abigail@fnx.com (Abigail) writes:
 
++ > The URL is <URL:http://www.gnu.org/prep/tasks_3.html>.
 
++ > the page it is explained what they mean by free? Could you also point
++ > out why 'free' isn't mentioned for the manuals of Ghostscript, tcsh,
++ > PIC, X-window applications and the various X-window managers?
 
++ Maybe because there is no comment following about non-free books with
++ wich to contrast?
 
Could you point out why there is no comment about non-free books for
the other items? Or does the FSF really believe no books about writing
X-window applications have been written?
 
 
Abigail
-- 
perl -we '$_ = q ;4a75737420616e6f74686572205065726c204861636b65720as;;
          for (s;s;s;s;s;s;s;s;s;s;s;s)
              {s;(..)s?;qq qprint chr 0x$1 and \161 ssq;excess;}'


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

Date: Tue, 26 May 1998 14:52:03 GMT
From: birgitt@my-dejanews.com
Subject: Re: GPL documentation == unspeakable evil
Message-Id: <6kekuk$r3k$1@nnrp1.dejanews.com>

In article <6kdv95$oct$1@justus.ecc.lu>,
  Stefaan.Eeckels@ecc.lu (Stefaan A Eeckels) wrote:

> > package as a whole workable.
> The product is now a derivative of all the "many, many" modules
> all covered by the GPL. The contributions of the author
> authors are copyrighted by them, and covered (to the users of
> the package) by the GPL (as it's Perl, more probably the AL,
> but you asked about the GPL, didn't you).

Thanks for your answers. Let me see if I understand now better:

An author of GPLed package, whose work is a derivative work
of a small original GPLed package (you say size is not relevant),
and whose package needs modules and libraries copyrighted by
other authors all under GPL, has the freedom to change the license
of his package (his code plus all used code of the modules)
if he gets releases from all previous authors plus *all* authors
of all modules needed ?

So if then the author distributes only *his* code separately,
and let the users know, that without modules, libraries (all GPLed)
you cannot run his code, so you have to put these modules at
place xyz on your machine, and then it works.

Does he still need the release of all module author's if he
wants to change the license for his own code from a certain version on
from GPL to something else ?

If that is so, doesn't it make it very difficult then to use
modules, as changing licenses becomes so difficult ?


> > to change the license from being GPLed to something of
> > his liking, at least that's what I believe.

> AFAIK, he can not. His program is still a derivative of the
> original program, and the second author used it knowing that
> this implied his work should also be released under the GPL.
> If he wants to release it under a different license, he
> has to obtain the permission of the original author (who
> can decide to license his program under a different license,
> or refuse). The GPL protects the right of the original
> author, by making sure it, and any and all derivatives
> will remain under the GPL. The fact that author #2 contributed
> 90% of the code doesn't change that one iota.
> In addition, the program relies on "many, many" GPL'ed modules,
> and the contributions (large or small) of six other
> people. In order the change the licensing status of the
> program, authorisation has to be obtained from *all* the
> authors.

Isn't that very difficult ?

And how fair is that, if your code is 10000 lines and the
module's code of another author is 40 lines, how is it that
this author can have so much power in licensing terms
over the 10 000 lines of code of the main author ?

> >
> > He still can decide to make it open source
> > and non-profit, but might want to distribute it differently
> > and find some kind of monetary support for future development
> > of the package.
> >
> > He could also decide to make it a for-profit product.

> No.

Why not if all participating authors would agree and gave the
permission/release ?


> Author #2 cannot change the licensing status of the program,
> as he doesn't hold all the copyrights, and doesn't have the
> appropriate licenses to do so.

So, basically that means that an author who has chosen once
GPL can not change to any other license as long as he has
not permissions and releases from *all* authors of code, who
originally participated to make the package a better product ?
Including authors of patches etc. independent of how big
or small the contribution were ?

This seems then not to be very "free" and could be potentially
"unfair".

> There is *no* indication that Open Source software is less
> 'safe' than proprietary software. As a matter of fact,
> the reverse is quite often true. There is a lot of
> sub-standard Open Source software (almost every CS student
> releases her final work under the GPL, and not all these
> efforts are of Apache, Linux or Samba quality), but
> there's no doubt that the best Open Source software
> rivals and often surpasses proprietary products.
> The Samba Team, the Apache people, and Linus all 'stand up'
> for their products - the only thing you can't do is sue
> them when you fail to take the proper precautions before
> using their software.

No problem, I agree and know that. I use Open Source software
all the time.


> There is no other option, unless the author(s) decide(s) to
> release under another license. And even then, the original
> program remains available under the GPL and can be maintained
> and enhanced by others. This is the purpose of the GPL.

I understood that part, I just don't understand how you can
ever get out of a GPL license if you have to get permissions
from so many authors who might have made only relatively
small contributions.


> > Am I wrong, naiv ?
> Both ;-)

Now, did I make a little progress here ? Or still very wrong ?
;-)

> > Please teach me a lesson ;-). I want to learn.

> Never stop learning, and keep an open mind. Make your
> own decisions, and assume responsibility for your actions.
> That's a lot safer than relying on the fact that you
> might be able to sue someone :-)


Ooops, I do, I do, I am not the sueing monger, but I
wouldn't choose software either which has the potential of doing
too much damage.

And I would not like to put years of my sweat into developing
software (if I were a software developer - luckily I never would
be able to be one anyway ;-) for which I would be
so much dependent on other people to change licensing terms even
slightly.

> Check www.opensource.org for more details.
>

I will.
Thank you for your answer.

Birgitt Funk




-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/   Now offering spam-free web-based newsreading


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

Date: 26 May 1998 13:45:14 GMT
From: tina@scandinaviaonline.se (Tina Marie Holmboe)
Subject: Re: Have we got a good free Perl manual?
Message-Id: <6keh1a$p1o$1@news1.sol.no>

In article <6kecdv$ncp$1@news1.sol.no>,
	tina@scandinaviaonline.se (Tina Marie Holmboe) writes:

>   Now, I freely admit that I am not quite sure what is put into the
>   word 'fee' here. It has been debated, I understand.
         ^^^

  Free! I mean *free* - argl. Thats what I get for trying to write
  anything whilst the sun is still up.

-- 
  Tina Marie Holmboe                
  Application Developer (Geeks'R'Us)         [tina@tech.scandinaviaonline.se]
  Scandinavia Online AB Development Dept.    (+46) 08 587 81000 (switchboard)
                                             (+46) 08 587 81189 (direct)


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

Date: Tue, 26 May 1998 14:55:23 GMT
From: datran@unx.sas.com (Dana Trantham)
Subject: Re: HELP: system() sometimes fails
Message-Id: <356bd717.324577037@newshost.unx.sas.com>


I've seen system("copy filea fileb");  and system("cd mydir");  both
fail on NT. Perhaps I should call a batch file similar to the
technique you've described below.

Dana

On Fri, 22 May 1998 12:37:42 GMT, charlie@antipope.org (Charlie
Stross) wrote:

>On Fri, 22 May 1998 07:11:34 +0100, Jeff Hamann 
><jrhamann@nospaminlink.com> wrote:
>
>>I am using a perl (5.004) script to launch a unix (DEC 3.2 and 4.0b)
>>program. The program is called with two quoted command-line parameters
>>with "&" appended. The entire call looks like this:
>>
>>            $var = "program_name \"parameter 1\"  \"parameter 2\" &"
>>
>>             system($var)
>>
>>It usually works (about 80% of the time) but sometimes the program seems
>>to launch halfway and the perl script locks up.
>
>When you call system() in perl, you're effectively doing a fork() followed
>by an exec(). The parent process then waits for the child process to
>exit. I'm not 100% certain without knowing a bit more about what you're
>doing, but you need to remember that you're not running a program in a
>shell, perl is directly exec'ing it; I'd be surprised if that orphan
>ampersand turns out to be doing anything. From your description, I guess
>what you really want to do is manually fork() and exec() from the child,
>without the parent waiting for the child to terminate. Alternatively, instead
>of calling system("program, arg1, arg2"), write a simple korn shell 
>wrapper that positionally substitutes the two parameters from its own
>command line and runs the program in the background, and use system()
>to call that. (Easier for the inexperienced, but not recommended.)
>
>
>
>-- Charlie



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

Date: 26 May 1998 13:41:08 GMT
From: "Bas" <Kortleven@holmes.nl>
Subject: How do I get the full pathname of a file?
Message-Id: <01bd88ab$ec20ce40$9191e5c2@clouseau.holmes.nl>

Hello,

I am a student in Holland and (if you have time and I am allowed) I would
like to ask you one question.

I start one of my Perlscripts like :   perl parse_debug.pl debug

So debug is the file that will be parsed. What I want is the full pathname
of debug (in my case.../home/bas/debug). I tried to do it with use Cwd but
this only works properly when the perlscript and the file are in the same
directory. Then I tried it with find2perl but this takes too long (it
searches the complete Unixsystem).

Isn't it possible to look backwards? Like I have got the file debug and
before debug comes bas and before bas comes home and that's it.


I hope to hear from you but I can imagine that you are busy..........if you
haven't got time just leave it then.

greetings 

Bas Kortleven



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

Date: 26 May 98 13:50:17 GMT
From: "JP" <pangjo@vincentinc.com>
Subject: How to add invisible counter on Web page
Message-Id: <01bd88ad$e63b2f00$974b88cf@fundata.com>

We are running Novell Web server with Perl interpeter installed.  We would
like to keep track of the main page without letting the users see the
counter.  

Can anyone tell me what I should do to accomplish this.  Thanks in advance.

Joe


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

Date: Tue, 26 May 1998 07:43:27 -0500
From: Trottinette <trot@cam.org>
Subject: Montreal Perl User Group
Message-Id: <356AB8EE.BC583BAE@cam.org>

Hi all! Bonjour tout le monde!

Le groupe des usagers de perl de Montrial est en formation.  Buts de ce groupe
: digustation de bihre, discussions et conversion du reste de la citi aux
vertus de perl.  Icrivez-moi pour plus d'information.

Perlers in Montreal are forming a user group.  Group's aim : drink beer,
discuss perl and evangelize the city with perl.  For more info contact me.

Nicolas Bertrand


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

Date: Tue, 26 May 1998 07:50:54 -0500
From: Trottinette <trot@cam.org>
Subject: Montreal Perl User Group
Message-Id: <356ABAAC.4FAF0D33@cam.org>

Hi all! Bonjour tout le monde!

Le groupe des usagers de perl de Montrial est en formation.  Buts de ce groupe
: digustation de bihre, discussions et conversion du reste de la citi aux
vertus de perl.  Icrivez-moi pour plus d'information.

Perlers in Montreal are forming a user group.  Group's aim : drink beer,
discuss perl and evangelize the city with perl.  For more info contact me.

Nicolas Bertrand


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

Date: 22 May 1998 14:23:05 GMT
From: "Artur R. Czechowski" <arturcz@kerigma.cyf.gov.pl>
Subject: Re: MS SQL server and Perl
Message-Id: <6k41o9$53s$1@kerigma.cyf.gov.pl>

S [sgoodyear@genxsys.com] in comp.lang.perl.misc wrote:
> I would like to DB access to an MS SQL server via perl. I'm running
> Perl5 on Redhat5
See thread:
>From Linux/perl to MS SQL
in this group.
-- 
Artur R. Czechowski <arturcz@kerigma.cyf.gov.pl>
See http://pgp.icm.edu.pl/pks/ for PGP public key
http://kerigma.cyf.gov.pl/~arturcz/


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

Date: Tue, 26 May 1998 14:59:53 GMT
From: violadawn@my-dejanews.com
Subject: Need Help on PERL installation !!!
Message-Id: <6keld8$rih$1@nnrp1.dejanews.com>

Hi, there.

I tried to compile Perl5.004 on VAX/VMS system recently. The compilation
process seemed has gone success, but then it failed during the testing
process on only one test. It blew up on testing  [.Lib]io_xs  .  I tried to
use the command sequence:
   $set default [.T]
   $@[-.vms]test .exe -v [.lib]io_xs.t
The system responded with error messgage "Test directory not found ..."

I need to solve this problem as soon as possible. If anyone here has any idea
or suggestion, please send mail to: dawn.ren@bowne.com

your help is greatly appreciated. Thanks!


Dawn Ren


-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/   Now offering spam-free web-based newsreading


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

Date: 26 May 1998 13:32:31 GMT
From: Stefaan.Eeckels@ecc.lu (Stefaan A Eeckels)
Subject: Re: need to do a ftp true a firewall, is someone has a solution
Message-Id: <6keg9f$pom$1@justus.ecc.lu>

In article <6ke4ln$rp1@news.vtcom.fr>,
	"Eric TIQUET" <etiquet@sv.vtcom.fr> writes:
> need to do a ftp true a firewall, is someone has a solution ?
Net::FTP has support for firewalls that require
	
	name@machine

proxy logins:

	$chn = Net::FTP->new(host, (Firewall => "fwall.my.net"));
	if (defined($chn))
	{
	    $chn->login("joe", "bloggs");
	    ...
	    
HTH,

-- 
Stefaan
-- 

PGP key available from PGP key servers (http://www.pgp.net/pgpnet/)
___________________________________________________________________
   Williams and Holland's Law:  If enough data is collected,
          anything may be proven by statistical methods.


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

Date: 26 May 1998 11:19:45 -0400
From: Walt Sullivan <walts@nortel.ca>
Subject: Re: need to do a ftp true a firewall, is someone has a solution
Message-Id: <yszhogwlm54e.fsf@bquah1c9.ca.nortel.com>

"Eric TIQUET" <etiquet@sv.vtcom.fr> writes:

> need to do a ftp true a firewall, is someone has a solution ?
> Thank you.
> ERIC

Letting us know which vendor's firewall, what authentication it's set
up to require, what OS, ... would help us help you.

If your firewall has (or is in parallel with) an proxy for HTTP, you
can use libwww-perl (available from CPAN) to fetch stuff through the
HTTP proxy.

-- 

Walt Sullivan (613) 763-7952 or ESN 393-7952. walts@nortel.ca
          FAX (613) 763-8312 or ESN 393-8312.
ServiceBuilder Development Support, Mail Stop QUAL 313


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

Date: Tue, 26 May 1998 08:16:38 -0500
From: Cris Shupp <cshupp@entergy.com>
Subject: NT Utilities with Perl
Message-Id: <356AC0B6.C98D5A85@entergy.com>

A  friend of mine wrote the 5 following  utilities in C:

NTPS - Process lister (similar to Unix ps)
NTFILES - Show open files on server, and who has them open
NTSERVERS - Show all servers in a domain, or all domains, and what
services they run
NTUSERS - Shows all users connected to a server, and for how long
SVCS - Show all services running on a machine, including their true
state

My question is this:  can they be done directly in Perl?  I know I can
do the last one.  I am most interested in
NTSERVERS in Perl.  Please help!!

Thanks
Cris Shupp



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

Date: Tue, 26 May 1998 14:11:43 GMT
From: WarezSpider@Warez.web/\oo/\ (/\oo/\ the original)
Subject: Re: O'Reilly has helped promote the acceptance of Perl
Message-Id: <35f4d059.63062942@news.sgi.net>

Evidently they didn't!
That happened  here exactly!
finally my partner was convinced which is great since he is the
"trained and schooled" programmer!!


On Thu, 21 May 1998 08:18:18 -0500, Scott Erickson
<Scott.L.Erickson@HealthPartners.com> wrote:

>Tom Christiansen wrote:
>
>...
>> O'Reilly has done more for free software than
>> FSF has even begun to acknowledge.  (I sense a pattern here.)  If those
>> books didn't exist, the programs would be deemed less "real" by users,
>> and thus less used.
>
>I agree that O'Reilly has done much to promote the acceptance of Perl as
>"real" software. I know of at least two situations where presenting a
>Perl book published by O'Reilly has changed the opinion of a key person
>such that they approved the use of Perl. Prior to that point, they had
>been opposed to the use of Perl because, it was free and because it was
>"not supported" (evidently, they do not understand usenet and FAQ's and
>documentation).
>
>Scott.



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

Date: 26 May 1998 13:29:24 GMT
From: "William Krige" <9435697@ml.petech.ac.za>
Subject: Online Message from PERL to WIN95
Message-Id: <01bd88ab$46ef1260$01ea040a@5thyear.petech.ac.za>

Hi

Does anyone know how to send a online message from PERL running on a
UNIX(HP-UX) platform to a normal WIN 95 machine or NT machine without PERL
on. Can this be done? IF so do you possibly know how or have some code as
to how to do it

Thanks
William
9435697@ml.petech.ac.za


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

Date: Tue, 26 May 1998 14:03:04 GMT
From: bwb@acm.org
Subject: Re: Perl terminology
Message-Id: <6kei2n$nad$1@nnrp1.dejanews.com>

In article <3561A3A2.2B6B7434@cookwood.com>,
  Liznet@cookwood.com wrote:
>
> Is there a book that starts at the _very_ beginning? (I have the camel and
> llama and a bunch of others, but they all assume the reader is already a
> programmer) Maybe I need a beginning programming book? Any suggestions?

Flat Hill Books has Perl book reviews and recommendations, including pointers
to good beginner books:

  http://www.flathill.com/languages/perl/

-bwb

-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/   Now offering spam-free web-based newsreading


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

Date: Tue, 26 May 1998 07:36:23 -0700
From: Michael Roeser <mroeser@removethis.gte.net>
Subject: PGP::Pipe (Pipe.pm) troubles
Message-Id: <6kej6r$n9o$1@gte1.gte.net>

Disclaimer: I'm still pretty green with modules and objects, so I might
be missing something easy here...

I'm trying to interface with pgp, and I'm having a tough time figuring
out how to use PGP::Pipe (aka Pipe.pm?).  When I try running a script
with the following subroutine, I get this error message
"Can't locate object method "new" via package "PGP::Pipe" at
test-decrypt.pl line 66".

Here's the subroutine:

sub pgp_decrypt {
    use PGP::Pipe;

    my ($filename, $phrase) = @_;
    my $pgp = new PGP::Pipe;

    %stats = Decrypt $pgp Password => '$phrase', File => '$filename';
    
    $decrypted = $stats{Text};
    
    return ($decrypted);
}


Now, I need to create the PGP object, right?  When I look at the source
for Pipe.pm, I see that it does have a "new" function, so I'm not sure
why my "my $pgp = new PGP::Pipe;" line is bombing out.

Also, I'm not sure that I'm calling the Decrypt function correctly --
above is my attempt at it after reading Pipe.pm.

Appreciate any help!

Mike 

(P.S. I'm running perl 5.004_04 on IRIX 6.2)


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

Date: Tue, 26 May 1998 10:17:13 -0400
From: "Johnson Chen ( C. H. Chen)A" <chia_ch@alcor.concordia.ca>
Subject: press "enter" key to leave
Message-Id: <Pine.OSF.3.96.980526101248.5110A-100000@alcor.concordia.ca>

How can I make users to leave this following program if user press only
enter key ?

<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 	

#!/local/paths/perl -w				#indicat the path
use strict;					#delaim all vriables
my %name_hash;			my $name;
my @name;			my @name_sort_keys;
my $name_input=" ";		my $sum=0;
my @name_request;		my $test_name;


%name_hash= qw(
Johnson johnson.gif Elsa elsa.gif Anny anny.gif	
);						#the name list for database
@name= keys (%name_hash);			#give keys to @name
@name_sort_keys= sort @name;			#sorting all names
						#lowercase in databse

print	"---------------------------------------------------------------\n";
print	"\t@name_sort_keys\n";			#print the sorted names
print	"---------------------------------------------------------------\n";

NAMEENTER: while (1) {				
	print	"\tEnter the name to see the gif file ...";
	chomp ($name_input=<>);
	$name_input=~tr/A-Z/a-z/;		
	if ($name_input =~ /^johnson$|^elsa$|^anny$/ ){	
		print	"We matched $name_input\n";
	} else { 
????		if ($name_input == " ") { last NAMEENTER;} else {
		print	"\ttry again\n";
		next;	}
		}
	}
	print	"the end of last NAMEENTER\n";



johnson





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

Date: Tue, 26 May 1998 15:10:14 GMT
From: vasile@club-internet.fr (Vasile CALMATUI)
Subject: Problem reading large files under Win95
Message-Id: <356ada4c.11370021@news.club-internet.fr>

Hello

I have a problem with big files under  Win95.

The problem is that I can read only the first 4-5 Mb from the file (total length is 25 Mb).
It works well by splitting the file in some little files of 4 Mb.

Is this a Perl limitation ? Or Win95 ? On Perl under Win95 ?
Had anybody else this problem ? A solution ?

Thanks,

PS : I'm using Perl for Win32 "normal version" (not ActiveState) version 5.004_02

- -
Vasile Calmatui
vasile@club-internet.fr
http://www.chez.com/vasile/


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

Date: Tue, 26 May 1998 14:48:02 GMT
From: datran@unx.sas.com (Dana Trantham)
Subject: Re: Problems with system command in perl
Message-Id: <356ad588.324177592@newshost.unx.sas.com>

I've seen cd and copy fail in system() on Win NT. I've not seen
problems with cd and cp inside system() on Unix.


On Tue, 12 May 1998 23:12:46 -0400, Gangadhar Konduri <gangs@mit.edu>
wrote:

>Hi,
>
>I am running a java program where it posts to a CGI script written in
>perl. The cgi script in turn fires another java program thro the system
>command. All this workjed fine a few days ago. And i suddenly find it
>not working. 
>
>I stripped the program downm to one which just calls a system command to
>run a java program which prints a number to a file. This was working
>fine if run directly in a shell. But if run from a browser, whatever is
>there in the system command, it is not getting executed at all (Because
>teh java program saves a number in a file, i clearly know that it is not
>working). 
>
>Please, please help me!
>
>Thanks in advance,
>
>--Gangadhar.
>
>The stripped down program. 
>
>
>#!/opt/local/bin/perl 
>
>use Socket;
>require "../UTIL/soc-cgilib.pl";
>require "../UTIL/wraputil.pl";
>
>$|=1;
>
>print &PrintHeader;
>@args= ("java -classpath
>.:/export/home0/deba/Java/JDK1.02/java/lib/classes.zip temp"); 
>$rc = oxffff & system @args;
>@args= ("echo" ,"general" );
>system(@args);
>print "output";
>print "   $rc";



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

Date: Tue, 26 May 1998 09:56:00 -0500
From: tfo@telalink.net (Thomas Frederick O'Connell)
Subject: run-time require issues
Message-Id: <tfo-2605980956000001@jesus.telalink.net>

okay, i am trying to determine which of a set of modules i need to use at
run-time. i have a directory structure set up for these modules with the
hope that i would be able to use perl's nested packages syntax (i.e. such
that Moduleset::Module in the code translates to Moduleset/Module on the
system). i cannot use "use" since it is a compile-time command. however, i
have found that when using require, my desired syntax only works if i do
an eval, which seems unnecessary.

here are some examples:

what i want to do:

$module = "Moduleset::Module";
require $module;
$module->import();

in this case, perl complains that it cannot find "Moduleset::Module"
(after i have added it to @INC).

what i tried to do:

$module = "Moduleset/Module.pm";
require $module;
$module->import();

here, the require worked, but the import failed.

what finally worked:

$module = "Moduleset::Module";
$stmt = "require $module; $module->import();";
eval( $stmt );

what also worked, but what i can't actually do in my code:

require Moduleset::Module;
Moduleset::Module->import();

is the eval really necessary, or is there some other way i can convince
perl that the variable i am giving require should be interpreted as if it
were static?

thanks.
-freddie


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

Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin) 
Subject: Digest Administrivia (Last modified: 8 Mar 97)
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.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 2723
**************************************

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