[19528] in Perl-Users-Digest
Perl-Users Digest, Issue: 1723 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Sep 10 09:05:31 2001
Date: Mon, 10 Sep 2001 06:05:08 -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: <1000127107-v10-i1723@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Mon, 10 Sep 2001 Volume: 10 Number: 1723
Today's topics:
Re: AoH - continued (Anno Siegel)
Re: Baiting Gozilla to obtain quality code for nothing! <kathrynmwood@earthlink.com>
Re: Can not run without -w <tintin@snowy.calculus>
Re: dec2hex conversion ,uninitialized value (Peter J. Acklam)
Re: dec2hex conversion ,uninitialized value (Anno Siegel)
Re: dec2hex conversion ,uninitialized value (Peter J. Acklam)
File Upload CGI - Mac issue <s.warhurst@rl.ac.uk>
Re: File Upload CGI - Mac issue <bill.kemp@wire2.com>
Re: File Upload CGI - Mac issue <s.warhurst@rl.ac.uk>
Re: File Upload CGI - Mac issue <bill.kemp@wire2.com>
Re: File Upload CGI - Mac issue <Thomas@Baetzler.de>
Re: Order of subroutines in perl script (Tad McClellan)
Re: POST form data from e-mail client <miked@rdi-clear.com>
Re: Simple regexp (Anno Siegel)
Re: Stand-alone Perl programs in Win32 <newspost@coppit.org>
Re: terminal Emulator (Cameron Laird)
use strict my $foo = ""; Bug? <jgrg@sanger.ac.uk>
Re: Where can I find a Perl SSH Telnet Client? <pilsl_@goldfisch.at>
Re: Where can I find a Perl SSH Telnet Client? (Tad McClellan)
Re: Where can I find a Perl SSH Telnet Client? <tintin@snowy.calculus>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 10 Sep 2001 12:48:01 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: AoH - continued
Message-Id: <9nicq1$o31$1@mamenchi.zrz.TU-Berlin.DE>
According to Benjamin Goldberg <goldbb2@earthlink.net>:
[...]
> > foreach my $href (@data) {
> > for (@sortkeys) {
> > push(@goods, $href->{$_});
> > }
> > }
>
> This pair of loops could be shortened to:
> @goods = map $_->{@sortkeys}, @data;
You mean
@goods = map @{$_}{@sortkeys}, @data;
Anno
------------------------------
Date: Mon, 10 Sep 2001 12:20:05 GMT
From: "Kate" <kathrynmwood@earthlink.com>
Subject: Re: Baiting Gozilla to obtain quality code for nothing!!
Message-Id: <Vd2n7.10910$5r.876241@newsread2.prod.itd.earthlink.net>
> Until I learned that this Godzilla goes by the "name" kira and claims to
be
> female, that's exactly what I took the monikers to mean. Whoever this
person
> is, s/he definitely has some serious issues. A desperate need for
attention
> coupled with an underlying fear of being exposed isn't the sign of a
normal
> person. I've taken the route of ignoring anything it writes now because it
> isn't worth the wasted effort to get through the pretentious verbosity to
> see what it has to say - and anyone who hides behind pseudonyms isn't
worth
> debating with.
>
> Matt
>
2 words - lighten up! This isn't a group therapy session, which is a good
thing cuz we might all be in a lot of trouble if it was. She obviously
enjoys her work, and she's good at it. And if she just says what every woman
that ever went into a "man's" profession thinks 50 times a day - good!
Someone has to say it, don't they.
Kate
------------------------------
Date: Mon, 10 Sep 2001 22:44:12 +1000
From: "Tintin" <tintin@snowy.calculus>
Subject: Re: Can not run without -w
Message-Id: <uB2n7.24$sG4.641128@news.interact.net.au>
"Batara Kesuma" <bkesuma@yahoo.com> wrote in message
news:8a89aec5.0109100024.2184bc01@posting.google.com...
> Hi,
>
> I found a strange thing with my script. It only runs if you put -w
> options. If I don't put the -w options, file not found error will be
> displayed. What happened? Please help me. Thank you very much.
Your script will run with any valid perl flag, not just -w. Check google
groups archive for
long and detailed explainations.
------------------------------
Date: 10 Sep 2001 13:09:19 +0200
From: jacklam@math.uio.no (Peter J. Acklam)
Subject: Re: dec2hex conversion ,uninitialized value
Message-Id: <wk4rqbs3og.fsf@math.uio.no>
Benjamin Goldberg <goldbb2@earthlink.net> wrote:
> Peter J. Acklam wrote:
> >
> > Hmm. Then I guess dec2int would be
> >
> > sub dec2int {
> > return +$_[0];
> > }
>
> Sorry, no. Try
> perl -e' sub x{return +$_[0]} print x("foo"), "\n" '
> and you will see that it prints:
> foo
So what? I tried to write a routine for converting a "decimal" to
an "integer" and you expect it to treat "foo" in some sensible
manner? "foo" isn't a decimal number.
> I think what you really want in place of this is:
> sub str2num {
> no warnings qw(numeric);
> return $_[0]+0;
> }
No. What I wanted to do was to put a string in numeric context,
and then a unary plus is sufficient. There is no need for binary
addition.
Peter
--
#!/local/bin/perl5 -wp -*- mode: cperl; coding: iso-8859-1; -*-
# matlab comment stripper (strips comments from Matlab m-files)
s/^((?:(?:[])}\w.]'+|[^'%])+|'[^'\n]*(?:''[^'\n]*)*')*).*/$1/x;
------------------------------
Date: 10 Sep 2001 11:34:17 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: dec2hex conversion ,uninitialized value
Message-Id: <9ni8fp$fr9$1@mamenchi.zrz.TU-Berlin.DE>
According to Peter J. Acklam <jacklam@math.uio.no>:
> Benjamin Goldberg <goldbb2@earthlink.net> wrote:
>
> > Peter J. Acklam wrote:
> > >
> > > Hmm. Then I guess dec2int would be
> > >
> > > sub dec2int {
> > > return +$_[0];
> > > }
> >
> > Sorry, no. Try
> > perl -e' sub x{return +$_[0]} print x("foo"), "\n" '
> > and you will see that it prints:
> > foo
>
> So what? I tried to write a routine for converting a "decimal" to
> an "integer" and you expect it to treat "foo" in some sensible
> manner? "foo" isn't a decimal number.
>
> > I think what you really want in place of this is:
> > sub str2num {
> > no warnings qw(numeric);
> > return $_[0]+0;
> > }
>
> No. What I wanted to do was to put a string in numeric context,
> and then a unary plus is sufficient. There is no need for binary
> addition.
I don't think so.
perl -le '$x = "123x"; $y = +$x; $z = $x + 0; print "y: $y, z: $z"'
prints
y: 123x, z: 123
Obviously, "$y = +$x" doesn't force numeric context, but "$z = $x + 0"
does.
Anno
------------------------------
Date: 10 Sep 2001 14:38:09 +0200
From: jacklam@math.uio.no (Peter J. Acklam)
Subject: Re: dec2hex conversion ,uninitialized value
Message-Id: <wkr8tf8bm6.fsf@math.uio.no>
anno4000@lublin.zrz.tu-berlin.de (Anno Siegel) wrote:
> I don't think so.
>
> perl -le '$x = "123x"; $y = +$x; $z = $x + 0; print "y: $y, z: $z"'
>
> prints
>
> y: 123x, z: 123
>
> Obviously, "$y = +$x" doesn't force numeric context, but "$z =
> $x + 0" does.
You're right. I tried out my code before posting, but my test
code was incorrect. *Sigh*
Peter
--
#!/local/bin/perl5 -wp -*- mode: cperl; coding: iso-8859-1; -*-
# matlab comment stripper (strips comments from Matlab m-files)
s/^((?:(?:[])}\w.]'+|[^'%])+|'[^'\n]*(?:''[^'\n]*)*')*).*/$1/x;
------------------------------
Date: Mon, 10 Sep 2001 11:42:23 +0100
From: "S Warhurst" <s.warhurst@rl.ac.uk>
Subject: File Upload CGI - Mac issue
Message-Id: <9ni5eg$qc6@newton.cc.rl.ac.uk>
This is not strictly a Perl issue, but I couldn't find a more appropriate NG
on my particular feed.
I have a Perl script that allows files to be uploaded to our server from a
web page containing a standard HTML (RFC1867) File Upload box (the ones with
attached browse button). Now, with IE & Netscape on Windows, when you select
a file it places the filename (eg: myfile.txt) in the upload box, but when
parsing the submitted form data I get the full path (eg:
c:\data\myfile.txt). The Perl script then proceeds to upload the file
without a problem. However, when the client uses a Mac and I parse the form
data, all I get is the file name and the upload script falls over. What's
more, while on Windows you can manually type in the full path in the upload
box, on the Mac the field only accepts input via the browse button.
The answer to this may well be not Perl, but has anyone come across and got
round this particular problem?
Thanks
---------¦
Bigus @ work
¦----------
------------------------------
Date: Tue, 11 Sep 2001 00:10:31 +0100
From: "W K" <bill.kemp@wire2.com>
Subject: Re: File Upload CGI - Mac issue
Message-Id: <Zc1n7.607$t97.7422@news.uk.colt.net>
> I have a Perl script that allows files to be uploaded to our server from a
> web page containing a standard HTML (RFC1867) File Upload box (the ones
with
> attached browse button). Now, with IE & Netscape on Windows, when you
select
> a file it places the filename (eg: myfile.txt) in the upload box, but when
> parsing the submitted form data I get the full path (eg:
> c:\data\myfile.txt). The Perl script then proceeds to upload the file
> without a problem. However, when the client uses a Mac and I parse the
form
> data, all I get is the file name
Yep. that sounds right. That's just what a mac does.
>and the upload script falls over.
I have been using CGI.pm and it works.
Is it the upload or what you are doing after the upload that is failing.
I hope you aren't using the user's filename when you save it on your on
system (at least not without removal of all sorts of potentially unpleasant
characters).
>What's
> more, while on Windows you can manually type in the full path in the
upload
> box, on the Mac the field only accepts input via the browse button.
sounds good to me. No typed in nonsense to have to throw back to the user.
------------------------------
Date: Mon, 10 Sep 2001 12:27:44 +0100
From: "S Warhurst" <s.warhurst@rl.ac.uk>
Subject: Re: File Upload CGI - Mac issue
Message-Id: <9ni83h$ura@newton.cc.rl.ac.uk>
Hi
I don't know the methods used in CGI.pm, but I modified a file upload script
I found on the net, and it looks like this:
-------------------------------
# Contents of File Upload box
$file = $query->param("file");
# Upload file
open (OUTFILE, ">$");
binmode(OUTFILE);
while ($bytesread = read($file, $buffer, 1024))
{
print OUTFILE $buffer;
}
close (OUTFILE);
-------------------------------
So, if $file = "myfile.txt" the script doesn't work, but if it's
"c:\data\myfile.txtx" it does. ANy ideas?
With regard to unpleasant characters, I replace any spaces in the user's
filename with underscores.. would that be sufficient to foil any attempts at
performing illicits commands on my system?
Regards
---------¦
Bigus @ work
¦----------
"W K" <bill.kemp@wire2.com> wrote in message
news:Zc1n7.607$t97.7422@news.uk.colt.net...
> > I have a Perl script that allows files to be uploaded to our server from
a
> > web page containing a standard HTML (RFC1867) File Upload box (the ones
> with
> > attached browse button). Now, with IE & Netscape on Windows, when you
> select
> > a file it places the filename (eg: myfile.txt) in the upload box, but
when
> > parsing the submitted form data I get the full path (eg:
> > c:\data\myfile.txt). The Perl script then proceeds to upload the file
> > without a problem. However, when the client uses a Mac and I parse the
> form
> > data, all I get is the file name
>
> Yep. that sounds right. That's just what a mac does.
>
> >and the upload script falls over.
>
> I have been using CGI.pm and it works.
> Is it the upload or what you are doing after the upload that is failing.
>
> I hope you aren't using the user's filename when you save it on your on
> system (at least not without removal of all sorts of potentially
unpleasant
> characters).
>
> >What's
> > more, while on Windows you can manually type in the full path in the
> upload
> > box, on the Mac the field only accepts input via the browse button.
>
> sounds good to me. No typed in nonsense to have to throw back to the
user.
>
>
------------------------------
Date: Tue, 11 Sep 2001 00:45:29 +0100
From: "W K" <bill.kemp@wire2.com>
Subject: Re: File Upload CGI - Mac issue
Message-Id: <LJ1n7.609$t97.7438@news.uk.colt.net>
> I don't know the methods used in CGI.pm, but I modified a file upload
script
> I found on the net, and it looks like this:
you appear to be using CGI.pm ("found on the net" yuk)
> # Contents of File Upload box
> $file = $query->param("file");
>
> # Upload file
> open (OUTFILE, ">$");
I don't get this bit. ">$string_with_a_filename_in_it" perhaps.
does "$" on its own mean something I don't know about?
Anyway. You aren't checking whether the file has opened or not.
Without error checking things will fail (if you are lucky), and you won't
know why.
> binmode(OUTFILE);
> while ($bytesread = read($file, $buffer, 1024))
> {
> print OUTFILE $buffer;
> }
> close (OUTFILE);
> -------------------------------
>
> So, if $file = "myfile.txt" the script doesn't work, but if it's
> "c:\data\myfile.txtx" it does. ANy ideas?
>
> With regard to unpleasant characters, I replace any spaces in the user's
> filename with underscores.. would that be sufficient to foil any attempts
at
> performing illicits commands on my system?
maybe. some. You'd best read some stuff about it.
Preferably not from the site you have already used because anyone that lets
you open a file without checking whether the file opened is leading you down
a dodgy garden path.
------------------------------
Date: Mon, 10 Sep 2001 14:15:14 +0200
From: =?ISO-8859-1?Q?Thomas_B=E4tzler?= <Thomas@Baetzler.de>
Subject: Re: File Upload CGI - Mac issue
Message-Id: <4abppt8qodn3ash7pqkrth2sjcrpivg5h8@4ax.com>
Hi,
On Mon, 10 Sep 2001, "S Warhurst" <s.warhurst@rl.ac.uk> wrote:
>I don't know the methods used in CGI.pm, but I modified a file upload script
>I found on the net, and it looks like this:
>
>-------------------------------
> # Contents of File Upload box
> $file = $query->param("file");
>
> # Upload file
> open (OUTFILE, ">$");
> binmode(OUTFILE);
> while ($bytesread = read($file, $buffer, 1024))
> {
> print OUTFILE $buffer;
> }
> close (OUTFILE);
>-------------------------------
See the section "CREATING A FILE UPLOAD FIELD" in the CGI.pm
documentation (perldoc CGI):
-snip-
To be safe, use the upload() function (new in version 2.47). When
called with the name of an upload field, upload() returns a
filehandle, or undef if the parameter is not a valid filehandle.
$fh = $query->upload('uploaded_file');
-snap-
Additionally, you shouldn't reuse the incoming filename at all -
depending on what server you're running on, people could do really
weird things if they figure out that you just replace blanks with
underscore characters. To be on the safe side, generate a unique file
name from things like the current timestamp and your process id.
HTH,
use strict;my($i,$t,@r)=(0,'5 -.@BHJPT4acd6e2hk2lmn2o4r2s3tuz',map{ord}
split//,unpack('u*','L#`T&)QD5#0`#!!`#%1D)#08`#P05!!(3``$$"``#"0L&``('.
'"`P<!`````0$`'));$t=~s/(\d)(.)/$2x$1/eg;map{$t.=substr$t,$i,1,''while
$_--;$i++}@r;print"$t\n";
------------------------------
Date: Mon, 10 Sep 2001 12:48:21 GMT
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Order of subroutines in perl script
Message-Id: <slrn9pp8te.tft.tadmc@tadmc26.august.net>
Justin Wyllie <justin@comms81.freeserve.co.uk> wrote:
>i have a simple question relating to perl; if someone could help me
>understand this i would be really grateful.
>sub A()
>{
>
>}
http://www.perl.com/pub/a/language/misc/fmproto.html
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 10 Sep 2001 11:34:28 +0100
From: "Mike Dobson" <miked@rdi-clear.com>
Subject: Re: POST form data from e-mail client
Message-Id: <AH0n7.9369$4j4.39106@NewsReader>
Cheers gnari
I am using CGI.pm but the form data when posted from the vote poll through
my e-mail client (Outlook Express) using the POST method nothing came
through but did when I switched to the GET method.
I've updated the script to use the GET method and now works a treat.
Cheers,
Mike D
contact@votesite.co.uk
"gnari" <gnarinn@hotmail.com> wrote in message
news:999888642.557337233796716.gnarinn@hotmail.com...
> In article <b02m7.1421$Rd5.10452@NewsReader>,
> Mike Dobson <miked@rdi-clear.com> wrote:
> >
> >I have an "E-mail this Vote Poll to a friend" set up on a site which send
a
> >copy of the poll to their e-mail so they can vote directly from their
e-mail
> >client (HTML enabled), similar to the www.devx.com e-mails I get.
> >
> >The problem I'm having is that the form is current set to method="POST"
> >which doesn't seem to pass on the form data but does using method="GET"
> >(which makes sense). DevX use POST but send the data to ASP.
> >
> >Before I make alterations to the script is it possible the receive POST
form
> >data from an e-mail client to the Perl/CGI script.
> >
> >Cheers in advance for any advice/comments
>
> I do not understand what your problem is, but if you are not using
> CGI.pm , then the solution is:
>
> use CGI;
>
>
> gnari
>
------------------------------
Date: 10 Sep 2001 13:02:04 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: Simple regexp
Message-Id: <9nidkc$o31$2@mamenchi.zrz.TU-Berlin.DE>
According to Tad McClellan <tadmc@augustmail.com>:
> Scott <scotty99@earthlink.net> wrote:
>
> >we have the following output piped in from a unix program:
> >12312 /home/this
> >3234 /home/that
> >12213 /var/horses
> >
> >while(FD){
> ^^
> ^^
>
> Bareword found in conditional at ...
>
>
> >#I need an expression here that will make $_ just the first number
> >field
> >#ie the first time around in this case would be 12312
>
>
> $_ = (split)[0]; # split() and a "list slice"
>
> or
>
> s/^(\d+).*/$1/s; # substitution
...or
( $_) = /(\d+)/;
Randal's Rule rules.
Anno
------------------------------
Date: Mon, 10 Sep 2001 07:56:03 -0400
From: David Coppit <newspost@coppit.org>
Subject: Re: Stand-alone Perl programs in Win32
Message-Id: <3B9CAA53.5060306@coppit.org>
Tucker McLean wrote:
> I was wondering what I could do to make my Perl program run by itself
> without Perl having to be around (such as if I distributed it). If
> possible, maybe without having to install Cygwin and using the
> compiler. I know there is several ways to do this with Tcl/Tk. Any
> help is appreciated.
It's a FAQ. Check perlfaq, and also search http://groups.google.com/ for
"comp.lang.perl.* compile". (perl2exe comes to mind, as well as
ActiveState's product-whose-name-I-forget)
David
------------------------------
Date: 10 Sep 2001 07:45:33 -0500
From: claird@starbase.neosoft.com (Cameron Laird)
Subject: Re: terminal Emulator
Message-Id: <BC7AE6928DCF59F5.57848A323E969D77.F2E16F1D5B3A4CEE@lp.airnews.net>
In article <3B9C6AA5.D583FFAD@earthlink.net>,
Benjamin Goldberg <goldbb2@earthlink.net> wrote:
>Doyle Rivers wrote:
>>
>> Does anyone know of an existing perl terminal emulator program?
>> I would like to be able to connect to a server via telnet and run
>> various scripts, however the Net::Telnet module is not sufficient for
>> my needs.
>>
>> Anyway, if you know of a perl terminal emulator out there please let
>> me know, it will save me a lot of time having to figure out how to
>> write one myself.
>
>Look into the following modules, available from CPAN:
>Ptty
>IO::Pty, IO::Tty
>
>And things which use these:
>Expect
>IPC::Run
>
>I'm sure one of these will do what you want.
>Probably you'll want to use Expect and spawn the "telnet" program.
.
.
.
Expect is indeed wonderful.
How does Net::Telnet fail you?
The Jeffs write on exactly this question in their columns on
Expect for Perl at <URL:
http://search.cpg.com/query.html?col=&ht=0&qp=&qs=&qc=&pw=100%25&ws=0&la=&qm=1&si=0&rf=1&qm=1&ct=1914607132 >
--
Cameron Laird <claird@NeoSoft.com>
Business: http://www.Phaseit.net
Personal: http://starbase.neosoft.com/~claird/home.html
------------------------------
Date: Mon, 10 Sep 2001 13:46:31 +0100
From: James Gilbert <jgrg@sanger.ac.uk>
Subject: use strict my $foo = ""; Bug?
Message-Id: <3B9CB627.B1333E63@sanger.ac.uk>
A new programmer who has just started working
for me had this piece of code:
use strict
my $foo = "";
ie: he forgot the semi-colon after use strict.
This has the effect of turning off strict because
it is doing:
use strict "";
This doesn't appear to be a deliberate part of
the syntax. The documented version being:
use no strict;
or:
use strict 'refs', 'vars'; # Allow unstrict 'subs'
Bug? James
------------------------------
Date: Mon, 10 Sep 2001 13:10:03 +0200
From: peter pilsl <pilsl_@goldfisch.at>
Subject: Re: Where can I find a Perl SSH Telnet Client?
Message-Id: <3b9c9f8c$1@e-post.inode.at>
BUCK NAKED1 wrote:
BUCK NAKED - WHAT A MAN ;)
guy, you are great :) did it ever occure to you that this is the wrong
place to meet potential sexual contacts. And even if : changing your name
frequently will make it even harder for them to identify you :)
Of course being a man is not the same than being stupid, but you will
understand that such uncommon names are at least funny in this newsgroup.
>
> So that I can login to my webhost's SSH telnet from WebTV when I'm not
> on the PC and enter Unix commands, chmod, install modules, use lynx,
> etc. WebTV can't use any of the windows clients, such as SecureCRT.
>
You have one of this WebTV-sets (TV with internetaddon) and you can run
perl on it ? I cant believe ..
Maybe there is some misunderstanding:
telnet is a protocol that allows you logon remote machines using
password-authentification. Telnet-clients are found on even the dumbest
machines and telnet-servers are found on every unsecured unixmachine.
So while its widely spread, its very unsecure cause all stuff (including
passwords) is transmitted plaintext and can be sniffed by an attacker
without big afford
ssh is a different protocol that allows you to logon remote machines using
password-auth or even more sophisticated auth-mechanisms like
public/private-keys scheme that might be known from pgp.
ssh-clients and servers are not that widely spread. nevertheless you can
use em on any linuxmachine that cares about security.
telnet and ssh are different things and cannot be mixed (you cannot connect
to a telnetserver using ssh-client and vice versa)
If your WebTV can run perl and you can install new modules on it (I doubt
it) thatn Net::SSH::Perl will be the right module for you. Whats the
problem with it ?
Can you actually do some perl-coding ?
If you are just looking for *any* ssh-client (like your previous posting
suggests) I'd visit comp.security.ssh and ask there. However you'll find
openssh on any ftp-mirror near you (try tucows or your next university)
best,
peter
--
peter pilsl
pilsl_@goldfisch.at
http://www.goldfisch.at
------------------------------
Date: Mon, 10 Sep 2001 12:48:22 GMT
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Where can I find a Perl SSH Telnet Client?
Message-Id: <slrn9pparp.tft.tadmc@tadmc26.august.net>
Mr Q. Z. Diablo <diablo@prometheus.humsoc.utas.edu.au> wrote:
>In article <06Vm7.12$044.236667@news.interact.net.au>, "Tintin"
><tintin@snowy.calculus> wrote:
>
>> "What A Man !" <whataman@home.com> wrote in message
>> news:3B9C1AA2.9A9A1AE2@home.com...
>> > peter pilsl wrote:
>> > Thanks, I really doubted that Perl had any SSH modules so I didn't
>> > check, but admit that I should have.
>I'm really confused.
Maybe you are ignorant of Dennis' posting history here?
>Why is this ng full of such unpleasant, smug,
>arrogant wankers with no social skills.
I expect you're missing context acquired over the last year or so.
>A gentle pointer to the fact
Dennis has gotten a few *dozen* gentle pointers in the past,
there is a limit to tolerance. After the same person asks
us to do their work for them a dozen times or more, the
flame throwers are going to come out. It is just human nature.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 10 Sep 2001 22:54:42 +1000
From: "Tintin" <tintin@snowy.calculus>
Subject: Re: Where can I find a Perl SSH Telnet Client?
Message-Id: <kL2n7.25$HH4.676983@news.interact.net.au>
"Mr Q. Z. Diablo" <diablo@prometheus.humsoc.utas.edu.au> wrote in message
news:diablo-F35444.15110910092001@newsroom.utas.edu.au...
> In article <06Vm7.12$044.236667@news.interact.net.au>, "Tintin"
> <tintin@snowy.calculus> wrote:
>
> > "What A Man !" <whataman@home.com> wrote in message
> > news:3B9C1AA2.9A9A1AE2@home.com...
> > > peter pilsl wrote:
> > > Thanks, I really doubted that Perl had any SSH modules so I didn't
> > > check, but admit that I should have. I did check www.openssh.org and
it
> > > said there was a unix client, but the only URL was in Finland, and it
> > > would never respond. I've now looked at the SSH modules that the other
> > > poster recommended, and still don't quite understand how to go about
> > > putting it together in a script. I was really hoping there was a "perl
> > > SSH telnet client script" already written by someone, so I wouldn't
have
> > > to re-invent the wheel. Seems like I saw a perl telnet client in one
of
> > > Randall Schwartz articles, if I can find it.
> >
> > I'm really confused. Why would you want a SSH "telnet" client?
>
> I'm really confused. Why is this ng full of such unpleasant, smug,
> arrogant wankers with no social skills. A gentle pointer to the fact
> that SSH and telnet are not the same thing and the basics of why would
> be somewhat kinder (and more useful) than the above one liner.
It is quite possible he might have been talking about telnet over a ssh
tunnel. You should never assume that you know what they want.
[snipped a whole lot of other rantings]
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V10 Issue 1723
***************************************
