[17108] in Perl-Users-Digest
Perl-Users Digest, Issue: 4520 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Oct 4 14:10:29 2000
Date: Wed, 4 Oct 2000 11:10: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: <970683013-v9-i4520@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Wed, 4 Oct 2000 Volume: 9 Number: 4520
Today's topics:
Re: Reverse by paragraphs - NOT! <uri@sysarch.com>
Re: Reverse by paragraphs - NOT! <bmb@ginger.libs.uga.edu>
Re: Reverse by paragraphs - NOT! <godzilla@stomp.stomp.tokyo>
Re: Sendmail/Perl question <nobody@nowhere.com>
Re: Sendmail/Perl question <bmb@ginger.libs.uga.edu>
serial connection & perl <josef.zellner@aon.at>
Re: Shortest code for Fibonacci? (wuz Re: advise on how <bmb@ginger.libs.uga.edu>
Re: Simultaneous file access and FLOCK? nobull@mail.com
System call works at command line but not within CGI <mflaherty2@earthlink.net>
Re: System call works at command line but not within CG (NP)
Using a comparison routine in another package stdenton@my-deja.com
RE: Using Net::FTP package without administrator help <sundaragopal.ramachandran@gs.com>
Re: what on is correct??? <tigz@ntlworld.com>
Re: what on is correct??? <anders@wall.alweb.dk>
Re: what on is correct??? <tigz@ntlworld.com>
Re: What's the differences between perl4 and perl5 (Jon S.)
Re: What's the differences between perl4 and perl5 <bmb@ginger.libs.uga.edu>
Re: Win32API::File [was: WinewAPI::File] <boogiemonster@usa.net>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 04 Oct 2000 15:21:42 GMT
From: Uri Guttman <uri@sysarch.com>
Subject: Re: Reverse by paragraphs - NOT!
Message-Id: <x7u2as4ooq.fsf@home.sysarch.com>
>>>>> "os" == ollie spencer <ollie_spencer@my-deja.com> writes:
os> I then do the {local $/=''; @ROF=reverse <INFILE>) bit and, after
os> closing the block to restore $/, get the result I desire: The file
os> reversed by paragraph.
os> That way WORKS. But it seems a bit clumsy!
clumsy? by what definition of clumsy? you don't know enough perl to
decide if something is clumsy.
try File::ReadBackwards and set the input record separator to "\n\n".
assuming clean paragraphs with only one blank line between each of them
it will do the job and possible faster than the other methods. whether
it is clumsy is up to you.
uri
--
Uri Guttman --------- uri@sysarch.com ---------- http://www.sysarch.com
SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
The Perl Books Page ----------- http://www.sysarch.com/cgi-bin/perl_books
The Best Search Engine on the Net ---------- http://www.northernlight.com
------------------------------
Date: Wed, 4 Oct 2000 11:39:44 -0400
From: Brad Baxter <bmb@ginger.libs.uga.edu>
Subject: Re: Reverse by paragraphs - NOT!
Message-Id: <Pine.A41.4.21.0010041104080.12946-100000@ginger.libs.uga.edu>
On Wed, 4 Oct 2000 ollie_spencer@my-deja.com wrote:
> Hi and thanks for the reply.
>
> Perhaps I wasn't clear. The file in question has a HEADER PARAGRAPH
> every 60 lines - in other words, it is a file that was intended to be
> printed, not processed by another program. By reading-in line-by-line,
> I can elimnate all header data with the
> while (/\(GTLT\)/ ... /"-"x45/) {next;} # OR SIMILAR
> code line, thus removing any header data, since the header first line
> always contains (GTLT) and the header last line always contains 45
> adjacent "-" characters.
>
> I wish I'd not mentioned the header, because it's NOT a my problem. I
> successfully excise the header and place the headerless data into @OF,
> even the blank lines.
>
> NOW comes my problem.
>
> I can write @OF to a file, then close and reopen it for reading.
>
> (I know I can open a file for both writing and reading, but again,
> that's NOT the problem)
>
> I then do the {local $/=''; @ROF=reverse <INFILE>) bit and, after
> closing the block to restore $/, get the result I desire: The file
> reversed by paragraph.
>
> That way WORKS. But it seems a bit clumsy!
I often solve problems by writing an intermediate file and then
manipulating that file. There is absolutely nothing wrong with that,
assuming it executes in acceptable time. Clumsy but works is much
better than Elegant but's wrong.
Otherwise, just concatenate the lines together that belong in a
paragraph.
1 #!/usr/local/bin/perl -w
2 use strict;
3
4 sub not_a_line_i_want {
5 return 1 if $_[0] =~ /^header/
6 } # end sub
7
8 my @a = ();
9 my $line = '';
10
11 while( <DATA> ) {
12
13 next if not_a_line_i_want( $_ );
14
15 if( /^$/ ) {
16 push @a, $line if $line;
17 $line = '';
18 next;
19 } # if
20
21 $line .= $_;
22
23 } # while
24
25 push @a, $line;
26
27 ### hyphen is for demonstration purposes
28 print join( "-\n", reverse( @a ) );
29
30 __DATA__
31 header line
32 header line
33
34 paragraph 1: ajsdklfa sdjfkla sdjkfl
35 ajsdklfj asldkfj alskdjf
36 asdlkfjas dlkfj a
37
38 paragraph 2: asjdklfja slaksd falskdf j
39 ajsdlkfja sldkfj alskdj flas
40
41 header line
42 header line
43
44 paragraph 3: ajsdklfja sdkljals dkfj
45 asldkfj alksdj fla
46 ajsldkfj alskdjf alskdj flas
Output:
paragraph 3: ajsdklfja sdkljals dkfj
asldkfj alksdj fla
ajsldkfj alskdjf alskdj flas
-
paragraph 2: asjdklfja slaksd falskdf j
ajsdlkfja sldkfj alskdj flas
-
paragraph 1: ajsdklfa sdjfkla sdjkfl
ajsdklfj asldkfj alskdjf
asdlkfjas dlkfj a
Brad
------------------------------
Date: Wed, 04 Oct 2000 09:28:17 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: Reverse by paragraphs - NOT!
Message-Id: <39DB5AA1.4E2BD744@stomp.stomp.tokyo>
ollie_spencer@my-deja.com wrote:
> Please! This is a work related problem. I have a real deadline, a real
> task, and an impatient manager. I don't have time to post or read
> inanities. You don't seem encumbranced by such concerns.
> PLEASE DON'T BOTHER ME WITH NONSENSE. Re-READ my answer to your first
> post. I'll not read any further posts by "Godzilla" to this string.
> I may seem doltish. I am a physics PhD and 63 years old. If my
> simplicity offends you, just ignore me, and I assure you I will
> ignore you.
I have tiny biting blue monkeys flying out of my big butt,
and O.J. Simpson is innocent as Snow White.
Godzilla!
------------------------------
Date: Wed, 04 Oct 2000 09:22:07 -0700
From: Rip Curl <nobody@nowhere.com>
Subject: Re: Sendmail/Perl question
Message-Id: <39DB592D.896E22CD@nowhere.com>
Well, I loose!
Martien Verbruggen wrote:
> [fixed jeopardy-posting style. PLEASE stop doing that. The commonly
> accepted quoting style here, and on most of Usenet, is to quote
> material first, and to put your reply after it. Mixing the two makes
> posts unreadable. Also, wrap your lines at 72 characters, or
> thereabouts]
>
> On Tue, 03 Oct 2000 16:01:50 -0700, Rip Curl <aslay@ucsd.edu> wrote:
> >
> > "Alan J. Flavell" wrote:
> >
> > > On Tue, 3 Oct 2000, Rip Curl jeopardized:
> > >
> > > > ????? Oh no you didn't... This wasn't directed at me right??
> > > > Cause nowhere in the original post did they mention security.
> > >
> > > If you don't understand that there is a security issue involved,
> > > and won't admit it even when it's pointed out, then any advice
> > > from you is even more dangerous than at first appeared.
> > >
> > > Fortunately, you're still posting upside-down, which is an almost
> > > sure-fire warning alarm around here.
> >
> > Hey,
> >
> > First of all, I looked in the sendmail bat book, sendmail man pages,
> > the perl book, and perl docs and I don't see them claiming what I
> > suggested is a security risk. All I have to go on is what Brad
> > wrote.
>
> Let's demonstrate it. Your suggestion is to pass variables on the
> command line to sendmail, with a construct like:
>
> open(MAIL,"|sendmail -t $email_addrs");
>
> apart from the erroneous -t (didn't your books tell you what that
> does?) What happens if
>
> $email_addrs = '; rm -rf /'; # [1]
>
> ? Do you know? Do you see now why it is dangerous to do that sort of
> thing?
>
Yeah, makes perfect sense to me. Brad, Alan, posters... I was a complete
idiot for not realizing that..
>
> And you don't only have what Brad wrote. www.deja.com, even in its
> curent stripped down state, still has numerous posts about this.
> You're not the only person who did this wrong. Instead of taking it so
> personally, you should try to learn. Open your mind.
>
> # perldoc perlsec
>
> > Second, there's pratically hundreds of security risks besides what I
> > wrote down (if it is in fact one!).
>
> None that are a direct result of code that you provided, that are
> easily fixed, and that are discussed here a few times every month.
>
> > Since you reverted to attacking my posting style (ouch,
> > that hurt), you can't be all that intelligent.
>
> Non sequitur.
>
huh?
>
> > Welcome to my world.
>
> And byebye from mine. *plonk*
Well, If I was in the non intelligent world and you just kicked me out....
>
>
> > Oh, I all most forgot to mention, since you didn't ask about it,
> > leaving your door open at night is a security risk.... I would give
> > you more but there's just too damn many. Sorry.
>
> But you didn't open my door, did you? You _did_ open that other
> security risk that people were talking about. Just give up and listen.
> You might actually learn something.
>
> Martien
>
You know, I fully agreed with his statement about "anybody advising on
security risks without understanding them" statement but did I give advise
on security? My problem was not realizing the risk, not giving bad
security advise. If I did, then any and all advise, by definition, is
security advise. Right? Or does that rule only pertain to perl and
sendmail advise (current topic)? Last time I checked, not many posts I've
read also included potential security problems along with their advise.
>
> [1] Do NOT try this to find out what happens. It is destructive.
> --
AAACCKKK!! what happend to all my files!
>
> Martien Verbruggen |
> Interactive Media Division | Think of the average person. Half of
> Commercial Dynamics Pty. Ltd. | the people out there are dumber.
> NSW, Australia |
------------------------------
Date: Wed, 4 Oct 2000 13:20:44 -0400
From: Brad Baxter <bmb@ginger.libs.uga.edu>
Subject: Re: Sendmail/Perl question
Message-Id: <Pine.A41.4.21.0010041317540.12946-100000@ginger.libs.uga.edu>
On Wed, 4 Oct 2000, Rip Curl wrote:
> Yeah, makes perfect sense to me. Brad, Alan, posters... I was a complete
> idiot for not realizing that..
For what it's worth, please don't credit me with overly much knowhow,
i.e., salt my posts liberally.
> > [1] Do NOT try this to find out what happens. It is destructive.
> > --
>
> AAACCKKK!! what happend to all my files!
This is the honor-system virus. Please forward this message to everyone
you know, then delete a random selection of critically important files
from your system.
Thank you.
------------------------------
Date: Wed, 04 Oct 2000 18:57:47 +0200
From: Joe <josef.zellner@aon.at>
Subject: serial connection & perl
Message-Id: <39DB618B.B46C1795@aon.at>
hi all!
how can i use the serial port (e.g. data transfering via serial port)
with perl?
thx
------------------------------
Date: Wed, 4 Oct 2000 11:59:20 -0400
From: Brad Baxter <bmb@ginger.libs.uga.edu>
Subject: Re: Shortest code for Fibonacci? (wuz Re: advise on how to set bugging on in perl file)
Message-Id: <Pine.A41.4.21.0010041154510.12946-100000@ginger.libs.uga.edu>
On Wed, 4 Oct 2000, Gwyn Judd wrote:
> I was shocked! How could Brad Baxter <bmb@ginger.libs.uga.edu>
> say such a terrible thing:
> >On Wed, 4 Oct 2000, Gwyn Judd wrote:
> >> Who says? Nothing is a perfectly valid program. I intend to do my PhD
> >> thesis on the NULL programming language. I have already written dozens
> >> of self-printing programs in it (just before the decimal point in this
> >> sentence is the 37th).
> >
> >Hmmm. A language with no bugs. Well, I guess you could have syntax
> >errors. Unless you treat any non-nulls as comments. Have you written an
> >interpreter yet?
>
> Thankfully one already exists. It's called "cat". I'm not sure that the
> language is Turing Complete. I think it would suffice to emulate
> Godzilla though.
The following program is written in the NULL programming language.
It calculates all of the Fibonacci numbers.
It runs in constant time.
Input: null
Ouput: null
Code follows:
------------------------------
Date: 04 Oct 2000 18:37:59 +0100
From: nobull@mail.com
Subject: Re: Simultaneous file access and FLOCK?
Message-Id: <u9r95w7big.fsf@wcl-l.bham.ac.uk>
Victor Koldun <lkh@class.class.lviv.ua> writes upside down:
> Hunting for info across the Net, here's what I found:
>
> Using flock() causes these multiple submissions to be
> processed in queue, preserving the integrity of the open file.
Not necessarily. It will preserve the integrity of the file but there
is AFAIK no requirement that flock() be implemented as a queue -
i.e. the process that's been waiting longest is not assured of getting
the lock first.
> This could be the answer to my question, but *then* the FLOCK function should
> never cause errors...
What if you try to flock() a file on a filesystem that doesn't
implement locking? What if you try to flock() a socket? What if you
try to take an exclusive lock on a file you've opened read-only? What
if the lock table resources are exhasted? What if the file is on a
remote file system and a network error occours?
> it should patiently wait for the file to be unlocked.
It will, unless there is an error.
> In real life, the programmer should check it:
>
> FLOCK(FH, 2) or die("swear");
Correct - you should always check the return value from system calls.
You should also include "$!" in the die message.
> Maybe I should use the sleep function in a loop to try to unlock the file a
> couple of times?
>
> until(FLOCK(FH,2)) { sleep 10; }
No, that would pathological.
> Sorry for being annoying, :)
[ snip entirity of my message ]
Rather than appologising for being annoying try not being annoying.
Quote _relevant_ parts of the message you are responding to _in_ context.
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
Date: Wed, 04 Oct 2000 16:47:45 GMT
From: "Mike Flaherty" <mflaherty2@earthlink.net>
Subject: System call works at command line but not within CGI
Message-Id: <RaJC5.7177$rO1.295143@newsread1.prod.itd.earthlink.net>
This works at the command line but not within CGI - no errors or anything.
Any thoughts?
@args = ("touch", "/misc/www/cgi-bin/test/bogus.txt");
system(@args);
------------------------------
Date: Wed, 04 Oct 2000 16:54:34 GMT
From: nvp@spamnothanks.speakeasy.org (NP)
Subject: Re: System call works at command line but not within CGI
Message-Id: <ehJC5.5665$wx5.164902@news2.giganews.com>
mflaherty2@earthlink.net wrote:
: This works at the command line but not within CGI - no errors or anything.
There's probably an error but you're just not handling it correctly.
: @args = ("touch", "/misc/www/cgi-bin/test/bogus.txt");
: system(@args);
I'd suggest one of a couple of things:
1.) Read the documentation for system() and how $? is used. Then
use CGI::Carp or redirect STDERR to STDOUT.
2.) Use backticks instead of system.
--
Nate II
------------------------------
Date: Wed, 04 Oct 2000 17:40:53 GMT
From: stdenton@my-deja.com
Subject: Using a comparison routine in another package
Message-Id: <8rfq32$9dq$1@nnrp1.deja.com>
After looking long and hard at CPAN, I'm trying to implement a Merge
module, analogous to the built-in sort routine. Rather than describe
it here, let me point you to the POD below. The biggest "problem" that
I'm facing right now is that I want to be able to share comparison
routines between sort and merge. Unfortunately, the magical
variables "$a" and "$b" are giving me headaches. For now I'm assuming
that it's being called from package main. I would really like to
use "caller()", but can't figure out how to make it work. Any ideas?
package Merge;
require 5.005; ## 5.000 is probably ok, but this is my version's level.
require Exporter;
@ISA = ('Exporter');
@EXPORT = qw(merge);
$VERSION = '1.00';
##
## Merge two lists whose contents are already sorted.
##
sub merge
{
my ($cmp, $lista, $listb) = @_;
## Just like with 'sort', the first argument is optional.
($cmp, $lista, $listb) =
(sub { $main::a cmp $main::b }, $cmp, $lista)
if ref($cmp) ne 'CODE';
## If either list is empty, return the other one.
return @$listb if (!@$lista);
return @$lista if (!@$listb);
## We have to use 'local' vars so sort-compatible subroutines work
right.
local ($main::a, $main::b);
($main::a, $main::b) = ($$lista[-1], $$listb[0]);
return @$lista, @$listb if &{$cmp} <= 0;
($main::a, $main::b) = ($$lista[0], $$listb[-1]);
return @$listb, @$lista if &{$cmp} >= 0;
my ($indexa, $lengtha, $indexb, $lengthb, @r) =
(0, scalar(@$lista), 0, scalar(@$listb));
($main::a, $main::b) = ($$lista[0], $$listb[0]);
while (1) {
if (&{$cmp} < 0) {
push @r, $main::a;
$indexa ++;
return @r, @$listb[$indexb..$lengthb-1]
unless $indexa < $lengtha;
$main::a = $$lista[$indexa];
} else {
push @r, $main::b;
$indexb ++;
return @r, @$lista[$indexa..$lengtha-1]
unless $indexb < $lengthb;
$main::b = $$listb[$indexb];
}
}
}
1;
__END__
=head1 NAME
merge - combine sorted arrays into one list
=head1 SYNOPSIS
use Merge;
@combined = merge \@list1, \@list2;
use Merge;
sub backwards { $b cmp $a }
@combined = merge backwards, \@list1, \@list2;
=head1 DESCRIPTION
The merge() function complements the C<sort> function in Perl.
It sometimes happens that you have some arrays that are already sorted,
but that need to be combined into a single, big list. The sort()
function lets you combine the contents of the arrays into a list and
then sorts it, but that is inefficient, because you are losing the
information already inherent in the fact that the lists are sorted.
This means that whereas sort() runs in "N * log N" time, merge() runs
in "N" time.
=head1 BUGS
This really should be a built-in function, so that it can be used
exactly as C<sort> is used. Failing that...
You can only merge two arrays.
The package "main::" has been hard-coded for the $a and $b variables
used by the comparison function. I really should be using the caller's
package.
Recent versions of C<sort> allow the use of prototyped comparison
functions.
$a and $b should be defined via typeglobs, so that the comparison
function gets direct references to elements of the lists, instead of
copies of the values.
=head1 AUTHOR
Sam Denton, Maryville Technology
=head1 COPYRIGHT
Copyright (c) 2000 Maryville Technology. All rights reserved.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
=cut
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Wed, 04 Oct 2000 12:10:21 -0400
From: sundar <sundaragopal.ramachandran@gs.com>
Subject: RE: Using Net::FTP package without administrator help
Message-Id: <39DB566D.196D11F2@gs.com>
Hi,
We have global perl modules and packages maintained by Unix
Administrator.
I like to use some of the Perl Packages like Net::FTP and Mail::Mailer.
But
I don't have administrator writes to include those packages.
I like to know , how could i use those packages without
administrator help.
Thanks,
Sundar.
PS: I tried to download packages into my local directory and try to
build, but
it didn't work.
------------------------------
Date: Wed, 4 Oct 2000 16:31:14 +0100
From: "Tigz" <tigz@ntlworld.com>
Subject: Re: what on is correct???
Message-Id: <t3IC5.12816$L12.257750@news2-win.server.ntlworld.com>
Thanks alot Jaap, really helps... :)
You dont know where i can find a list of perl comands etc.. do you?
Yours electronically
Mick,
Jaap <jaap@stack.nl> wrote in message
news:3xHC5.43455$Sb1.696063@nlnews00.chello.com...
> Both are good, the first sais that in ALL other cases than $testver == 0
to
> print test\n and the second sais that in other cases where $testver > 0 to
> print that.
>
> Teun
>
>
> "Tigz" <tigz@ntlworld.com> schreef in bericht
> news:j%DC5.12453$L12.251687@news2-win.server.ntlworld.com...
> > Hi could someone tell me which is correct, both seem to work fine, but i
> am
> > not sure. I actually dont have a clue what i am doing... I am just
trying
> to
> > lern....
> >
> > if ($testver eq 0) {
> > print ("test 1"\n");
> > } else {
> > print ("test"\n");
> > }
> >
> > or this:
> >
> > if ($testver eq 0) {
> > print ("test 1"\n");
> > }
> > if ($tierlevel gt 0) {
> > print ("test"\n");
> > }
> >
> > thankx
> > mick.
> >
> >
>
>
------------------------------
Date: Wed, 4 Oct 2000 17:37:55 +0200
From: Anders Lund <anders@wall.alweb.dk>
Subject: Re: what on is correct???
Message-Id: <laIC5.1005$UW.34439@news010.worldonline.dk>
Tigz wrote:
> Thanks alot Jaap, really helps... :)
> You dont know where i can find a list of perl comands etc.. do you?
% man perl
if your'e on *N*X
On Windows, you will find HTML docs in the perl dir, and I think you can
use the perldoc command in a DOS prompt.
So, You did get so angry with me that you didn't wish to read my answer??
-anders
--
[ the word wall - and the trailing dot - in my email address
is my _fire_wall - protecting me from the criminals abusing usenet]
------------------------------
Date: Wed, 4 Oct 2000 17:30:39 +0100
From: "Tigz" <tigz@ntlworld.com>
Subject: Re: what on is correct???
Message-Id: <9XIC5.12967$L12.259787@news2-win.server.ntlworld.com>
No i didn't get angry with u, :)
Anders Lund wrote:
> % man perl
> if your'e on *N*X
> On Windows, you will find HTML docs in the perl dir, and I think you can
> use the perldoc command in a DOS prompt.
>
> So, You did get so angry with me that you didn't wish to read my answer??
>
> -anders
>
> --
> [ the word wall - and the trailing dot - in my email address
> is my _fire_wall - protecting me from the criminals abusing usenet]
------------------------------
Date: Wed, 04 Oct 2000 17:09:40 GMT
From: jonceramic@nospammiesno.earthlink.net (Jon S.)
Subject: Re: What's the differences between perl4 and perl5
Message-Id: <39db6438.13723700@news.earthlink.net>
I believe it's -perl1.
...Although, my algebra's a bit cranky.
Jon
------------------------------
Date: Wed, 4 Oct 2000 13:28:13 -0400
From: Brad Baxter <bmb@ginger.libs.uga.edu>
Subject: Re: What's the differences between perl4 and perl5
Message-Id: <Pine.A41.4.21.0010041323260.12946-100000@ginger.libs.uga.edu>
On Wed, 4 Oct 2000, Jon S. wrote:
> I believe it's -perl1.
>
>
>
> ...Although, my algebra's a bit cranky.
>
> Jon
LOL
Brad
--
perl -e 'print perl1..perl6'
------------------------------
Date: Wed, 4 Oct 2000 11:45:16 -0700
From: "J Joseph Yusko" <boogiemonster@usa.net>
Subject: Re: Win32API::File [was: WinewAPI::File]
Message-Id: <8rfja8$bth$1@usenet01.srv.cis.pitt.edu>
"jason" <elephant@squirrelgroup.com> wrote in message
news:MPG.144523003c0372f59897e9@localhost...
> J Joseph Yusko wrote ..
> >Objective: to access the remote machine's file with permission rights
> >
> >Problematic: Can't access a remote machine. No problem with local file
> >permission.
> >
> >Solution: Shoot myself?
>
> show a short example of the problem that you're having - paying
> particular attention to describing your expected results - and the
> result that you're actually getting
>
i'm trying to create a script to access a file on a remote machine on an NT
enviornment over a Lan connection. I have full access so access is not an
issue. I need to see and connect to a specific file on a remote machine
(NT).
> also .. explain your network setup - ie. are you attempting to access
> said files across a Win32 network share ? .. or have you mapped a drive
> ? .. more details
>
Both or any situation would be ideal. Ultimately would be nice not to have
it mapped to get it working, but if requires me to be mapped then so be it.
Just to get it working would be nice. It is a shared folder though, but
what if situation arrives where I am not mapped or it is not shared. How
would I go around that?
> --
> jason -- elephant@squirrelgroup.com --
------------------------------
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 4520
**************************************
