[27214] in Perl-Users-Digest
Perl-Users Digest, Issue: 9015 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Mar 3 14:05:39 2006
Date: Fri, 3 Mar 2006 11:05:06 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Fri, 3 Mar 2006 Volume: 10 Number: 9015
Today's topics:
Re: Native Cut&Paste on Win* and Mac? <1usa@llenroc.ude.invalid>
Re: Problems after updating Net::SSH:Perl <rahed@e-last-minute.com>
Re: Win32::TieRegistry <1usa@llenroc.ude.invalid>
Re: Win32::TieRegistry <pue@gmx.net>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 3 Mar 2006 15:52:26 +0000 (UTC)
From: "A. Sinan Unur" <1usa@llenroc.ude.invalid>
Subject: Re: Native Cut&Paste on Win* and Mac?
Message-Id: <Xns977B6E9C96B0Casu1cornelledu@132.236.56.8>
Ilya Zakharevich <nospam-abuse@ilyaz.org> wrote in
news:du8ufo$566$1@agate.berkeley.edu:
> [A complimentary Cc of this posting was sent to
> A. Sinan Unur
> <1usa@llenroc.ude.invalid>], who wrote in article
> <Xns977AD5E263A5asu1cornelledu@127.0.0.1>:
>> I was not able to locate the module. But, would something like this
>> work?
>
> I put your code into 1.0207 (it compiles, but I can't check
> functionality, especially what happens with \r\n - on OS/2 by default
> there is translation on setting, but not on getting). Should
> propagate PAUSE -> CPAN very soon.
I decided to install the module on my office computer in between
teaching. Here is what I get if I run test.pl after installation:
C:\Home\asu1\src\Term-ReadLine-Perl-1.0207> perl test.pl
Features present: preput 1 getHistory 1 addHistory 1 attribs 1 ornaments
1 appname 1 minline 1 autohistory 1 newTTY 1 tkRunning 1 setHistory 1
Flipping rl_default_selected each line.
SetConsoleMode failed, LastError=|6| at
C:/opt/Perl/site/lib/Term/ReadKey.pm line 265.
at C:/opt/Perl/site/lib/Term/ReadLine/readline.pm line 1475
readline::readline('Enter arithmetic or Perl expression: ',
'exit') called at C:/opt/Perl/site/lib/Term/ReadLine/Perl.pm line 11
Term::ReadLine::Perl::readline('Term::ReadLine::Perl=ARRAY
(0x1a67b14)',
'Enter arithmetic or Perl expression: ', 'exit') called at test.pl line
38
Enter arithmetic or Perl expression:
The example works after that, but I am having a hard time using any
keybindings to actually copy from and paste into the line when test.pl is
running in a cmd.exe shell.
I gotta run to class now, but I'll look into this later.
Sinan
------------------------------
Date: Fri, 03 Mar 2006 15:48:12 +0100
From: rahed <rahed@e-last-minute.com>
Subject: Re: Problems after updating Net::SSH:Perl
Message-Id: <u64mvposz.fsf@e-last-minute.com>
"A. Sinan Unur" <1usa@llenroc.ude.invalid> writes:
> Martin Kissner <news@chaos-net.de> wrote in
> news:slrne0ejsd.219.news@maki.homeunix.net:
>
>> A. Sinan Unur wrote :
>>> Martin Kissner <news@chaos-net.de> wrote in
>>> news:slrne0e5d1.14b.news@maki.homeunix.net:
>>>
> ...
>>>> Can't locate object method "blocking" via package "IO::Handle" at
>>>> /System/Library/Perl/5.8.6/Net/SSH/Perl.pm line 212, <GEN0> line 1.
>>>
> It's quite possible that the only people who upgraded to 1.29 were the
> ones who cared fixes in that version, and the "blocking" bug did not
> show up on those systems. Who knows.
>
I upgraded and use the module without any errors.
hth
--
Radek
------------------------------
Date: Fri, 3 Mar 2006 15:23:09 +0000 (UTC)
From: "A. Sinan Unur" <1usa@llenroc.ude.invalid>
Subject: Re: Win32::TieRegistry
Message-Id: <Xns977B69A632C62asu1cornelledu@132.236.56.8>
January Weiner <january.weiner@gmail.com> wrote in
news:du9haj$4ri$2@sagnix.uni-muenster.de:
> A. Sinan Unur <1usa@llenroc.ude.invalid> wrote:
>> However, you don't need the registry to do what you want. I would
>> recommend the following:
>
>> 1. Check if $ENV{HOME} is defined. If it is, use that directory.
>
>> 2. If not, check if $ENV{APPDATA} and $ENV{USERNAME} are defined. If
>> it is, then create an application and user specific directory under
>> that path: Such as
>
>> $ENV{APPDATA}\myapp\$ENV{USERNAME}
>
> Thanks! Just one quick question. On a Windows system I can access,
> this variable shows a path that includes already my username; that is,
> it shows the path to my personal APPDATA. This is not standard by any
> chance?
There may be Win98 or ME systems where $ENV{APPDATA} is not user specific.
I don't know if $NEV{USERNAME} works on those systems, though.
HTH.
Sinan
------------------------------
Date: Fri, 03 Mar 2006 18:55:00 +0100
From: =?ISO-8859-1?Q?Andreas_P=FCrzer?= <pue@gmx.net>
Subject: Re: Win32::TieRegistry
Message-Id: <46re7nFcfa0tU1@individual.net>
A. Sinan Unur schrieb:
> January Weiner <january.weiner@gmail.com> wrote in
> news:du9haj$4ri$2@sagnix.uni-muenster.de:
>
>
>>A. Sinan Unur <1usa@llenroc.ude.invalid> wrote:
>>
>>>However, you don't need the registry to do what you want. I would
>>>recommend the following:
>>
>>>1. Check if $ENV{HOME} is defined. If it is, use that directory.
>>
>>>2. If not, check if $ENV{APPDATA} and $ENV{USERNAME} are defined. If
>>>it is, then create an application and user specific directory under
>>>that path: Such as
>>
>>>$ENV{APPDATA}\myapp\$ENV{USERNAME}
>>
I think that $ENV{'USERPROFILE'} is also worth checking.
But please let me recommend yet another way (if the module dependency is ok with
the OP):
http://search.cpan.org/~adamk/File-HomeDir-0.54/lib/File/HomeDir.pm
gives you a very simple yet reliable way to cope with $HOME-related tasks.
HTH,
Andreas Pürzer
--
Have Fun,
and if you can't have fun,
have someone else's fun.
The Beautiful South
------------------------------
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.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
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 9015
***************************************
