[18286] in Perl-Users-Digest
Perl-Users Digest, Issue: 454 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Mar 9 11:05:34 2001
Date: Fri, 9 Mar 2001 08:05:11 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <984153910-v10-i454@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Fri, 9 Mar 2001 Volume: 10 Number: 454
Today's topics:
[ANNOUNCE] Crypt::RSA 1.23 (Vipul Ved Prakash)
[ANNOUNCE] XML::XPath 1.06 <matt@sergeant.org>
ANNOUNCE: Perl/Tk widgets <rkiesling@mainmatter.com>
ANNOUNCE: Proc::ProcessTable 0.30 (Daniel J Urist)
Re: ASP/PerlScript - Database Connection Problem <gimonca@mirage.skypoint.com>
Re: binary to decimal conversion: FAQ answer is not goo (Anno Siegel)
Re: Can 2 Form actions be executed with one Submit butt <m0rejunkmail@home.com>
Re: execution problem <john@particlewave.com>
Re: FAQ 6.0: Why do I get weird spaces when I print a <mjcarman@home.com>
Re: Feeding value pairs to ASP scripts? <gimonca@mirage.skypoint.com>
Re: Free Linux account (Lorin Winchester)
FYI - lwp get + https + proxy <twhu@lucent.com>
Re: How do I fetch clipboard content? (Greg Bacon)
how do i spawn a new process when using CGI <igor_aptekar@programmer.net>
Re: Newbies welcome <webmaster@eyecreate.net>
Re: number <bart.lateur@skynet.be>
Re: number <aqumsieh@hyperchip.com>
Re: pack double-network-order <bart.lateur@skynet.be>
Re: Programmer with vision required <john@particlewave.com>
Re: Quick script question - I'm lost (Anno Siegel)
Re: Quick script question - I'm lost (Anno Siegel)
script change problem under mod_perl (sP6)
Trying to capture current directory in variable <mumble[anti-spam]@maths.uct.ac.za>
Re: Trying to capture current directory in variable <tom@power.net.uk>
Re: Trying to capture current directory in variable (Rafael Garcia-Suarez)
Re: using blat in a perl script to send form input <gimonca@mirage.skypoint.com>
Re: Win32::ODBC - can get info from Access97 database, <gimonca@mirage.skypoint.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 8 Mar 2001 11:07:31 GMT
From: vipul@shell2.ba.best.com (Vipul Ved Prakash)
Subject: [ANNOUNCE] Crypt::RSA 1.23
Message-Id: <tahu9u80fsg74e@corp.supernews.com>
NAME
Crypt::RSA - RSA public-key cryptosystem.
VERSION
$Revision: 1.23 $ (Beta)
$Date: 2001/03/07 15:39:55 $
AVAILABILITY
Crypt-RSA-1.23.tar.gz has been uploaded to CPAN.
DESCRIPTION
Crypt::RSA is a pure-perl, cleanroom implementation of the RSA
public-key cryptosystem, written atop the blazingly fast number theory
library PARI. As far as possible, Crypt::RSA conforms with PKCS #1,
RSA Cryptography Specifications v2.1[13].
This implementation is structured as a bundle of modules that provide
key pair generation and management, plaintext-aware encryption and
digital signatures with appendix. Crypt::RSA is a DWIM wrapper around
the other modules in the bundle.
AUTHOR
Vipul Ved Prakash
LICENSE
Copyright (c) 1998-2001, Vipul Ved Prakash. All rights reserved. This
code is free software; you can redistribute it and/or modify it under
the same terms as Perl itself.
MAILING LIST
pac@lists.vipul.net is a mailing list for discussing development of
asymmetric cryptography modules in perl. Please send Crypt::RSA
related communications directly to the list address. Subscription
interface for pac is at http://lists.vipul.net/mailman/listinfo/pac/
--
Vipul Ved Prakash, http://www.vipul.net/
PGP Fingerprint d5f78d9fc694a45a00ae086062498922
------------------------------
Date: Fri, 09 Mar 2001 12:10:39 +0000
From: Matt Sergeant <matt@sergeant.org>
Subject: [ANNOUNCE] XML::XPath 1.06
Message-Id: <tahu98jepsk137@corp.supernews.com>
XPath is a W3C specification for searching and matching nodes in an XML
document using a Unix path like language. XML::XPath implements this on
top of a garbage collecting DOM structure, with a mostly-DOM compatible
API.
Changes:
- 1.06 is a bug fix release, fixing a nasty namespace bug.
- This also changes the namespace handling to not use Expat's built in
namespace support, rather it implements namespace handling internally
(which makes the code smaller, and much easier to read!).
- It also fixes a long standing bug of not supporting attributes in the
xml: namespace (like xml:base and xml:lang).
- Finally, due to the above changes, the output rendering of a document no
longer has every namespace declaration on every node, which is a darn
sight prettier :-)
Get it from the CPAN, or from http://axkit.org/download/
--
<Matt/>
/|| ** Founder and CTO ** ** http://axkit.com/ **
//|| ** AxKit.com Ltd ** ** XML Application Serving **
// || ** http://axkit.org ** ** XSLT, XPathScript, XSP **
// \\| // ** mod_perl news and resources: http://take23.org **
\\//
//\\
// \\
------------------------------
Date: Fri, 09 Mar 2001 15:12:16 GMT
From: Robert Kiesling <rkiesling@mainmatter.com>
Subject: ANNOUNCE: Perl/Tk widgets
Message-Id: <tahu92ofha5q2e@corp.supernews.com>
This is to announce that two new Perl/Tk widgets have been
uploaded to CPAN.
Tk::SimpleFileSelect
A simple file selection widget derived from Tk::FileSelect.
Available at the URLs:
http://www.cpan.org/authors/id/R/RK/RKIES/Tk-SimpleFileSelect-0.55.tar.gz
http://www.mainmatter.com/Tk-SimpleFileSelect-0.55.tar.gz
Tk::Browser
A Perl/Tk UI and modules for browsing data, source code,
and documentation of a system's Perl libraries.
Available at the URL's
http://www.cpan.org/authors/id/R/RK/RKIES/Tk-Browser-0.80.tar.gz
http://www.mainmatter.com/Tk-Browser-0.80.tar.gz
As usual, constructive criticism and bug reports are most welcome.
--
Robert Kiesling
Linux FAQ Maintainer
rkiesling@mainmatter.com
http://www.mainmatter.com/linux-faq/toc.html http://www.mainmatter.com/
---
Tired of spam? Please forward messages to uce@ftc.gov.
------------------------------
Date: Fri, 9 Mar 2001 09:38:21 GMT
From: world!durist@uunet.uu.net (Daniel J Urist)
Subject: ANNOUNCE: Proc::ProcessTable 0.30
Message-Id: <tahu9e8fkg03a@corp.supernews.com>
A new version of Proc::ProcessTable has been released to CPAN. This version
contains support for Unixware 7.x courtesy of Martin Lucina, as well as
support for 32-bit HPUX 11 via the 64-bit interface, courtesy of David
Good.
Proc::ProcessTable provides an object-oriented interface to Unix process
table information.
--
Dan Urist
durist@world.std.com
http://www.world.std.com/~durist
------------------------------
Date: 9 Mar 2001 15:20:39 GMT
From: Charles Gimon <gimonca@mirage.skypoint.com>
Subject: Re: ASP/PerlScript - Database Connection Problem
Message-Id: <98asc7$2egb$1@shadow.skypoint.net>
PerlScript is Perl embedded in an active server page.
Just about anything you would normally do in Perl you can do in this
environment.
The only things that are "special" to PerlScript/ASP are:
--the embedding itself (works the same as other ASP environments)
--access to the same objects that are used in traditional VBScript/ASP
programming, for example:
$query = $Request->ServerVariables('QUERY_STRING')->{Item};
to grab the contents of QUERY_STRING (from an HTTP GET query).
If you're in a situation where you have no choice but to use ASP and IIS,
PerlScript can give you a ton of handy workarounds to otherwise
annoying Microsoft ways of doing things. I've found that the available
modules in Perl are much superior to anything available in VB.
If I lived in a perfect world, I'd be doing mod_perl on Apache on
FreeBSD right now...but since I have to work in an IIS environment,
PerlScript has made life so much more bearable.
I have yet to run into anything that I would want to do in Perl that
I haven't been able to do in a PerlScript/ASP environment. Other than
the examples above, I haven't had to rely on anything that is ASP or
IIS or MS-specific to get anything done.
In theory, I'm quite paranoid about MS having their tentacles in
ActiveState, but so far, I haven't personally had to deal with any
signs of "misbehavior". I remain watchful.
Miguel Cruz <mnc@admin.u.nu> wrote:
: Not to be difficult, but what is "PerlScript"? I occasionally hear Windowsy
: people using this word. Is it a Windowsification of the word "perl"? Or is
: it a different product?
--
Wild new Ubik salad dressing, not | gimonca@skypoint.com
Italian, not French, but an entirely | Minneapolis MN USA
new and different taste treat that's | http://www.skypoint.com/~gimonca
waking up the world! | Safe when taken as directed.
------------------------------
Date: 9 Mar 2001 14:08:46 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: binary to decimal conversion: FAQ answer is not good
Message-Id: <98ao5e$st6$1@mamenchi.zrz.TU-Berlin.DE>
According to John Lin <johnlin@chttl.com.tw>:
> Dear all,
>
> For binary to decimal conversion, FAQ gives some solutions:
>
> perldoc -q convert
>
> print ord(pack('B*','110110110110'));
> 219
> or
> print unpack('c', pack('B*','110110110110'));
> -37
>
> Both give wrong answer if the binary is just a little bit longer.
> Is there any other (better) build-in function to use here?
Bart Lateur has already pointed you to oct(). If you can't rely
on having a sufficiently recent perl, there's a base conversion
module among the Math:: modules which should do it.
What remains to do is pick a favorite nit of mine from your terminology:
You don't want to convert binary to decimal. You want to convert
a binary string to a number, where number means whatever your
computer wants it to mean. That the result is frequently printed
in decimal has nothing to do with the problem.
0xd, 1101b, XIII and 13 are different representations of one number,
and a number doesn't have properties like "binary" or "decimal".
Anno
------------------------------
Date: Fri, 09 Mar 2001 15:51:58 GMT
From: Paul <m0rejunkmail@home.com>
Subject: Re: Can 2 Form actions be executed with one Submit button?
Message-Id: <3AA90100.29AFF0F5@nospam.home.com>
Thanks for the response, Jon. I was actually making a script.
I just needed the script to perform 2 functions - to mail the data and
at the same time display a response page, when the <INPUT TYPE=submit
Value=Send> was clicked.
The script currently displays all entered from a form and then hidden
files are also generated. In the same page, there is a SUBMIT button
where the customer can review the data. If one of the entries are
incorrect, they can go back and correct it. Once all the entries are
correct, the SUBMIT button is clicked and I want it to do 2 things:
1) mail the data entries
2) Print a thank you page.
I've tried each one separately and they both work (separately). I really
wanted the script to perform both functions when the SUBMIT button is
clicked.
Hope anyone can help.
Thanks,
FORM Rookie
------------------------------
Date: Fri, 09 Mar 2001 07:49:45 -0800
From: John Lockwood <john@particlewave.com>
Subject: Re: execution problem
Message-Id: <2quhat0knfgdlgm6kadbdpeccmn9j0vjnc@4ax.com>
Well, I'm not sure what OSs you're familiar with, but if you're
running Apache on some kind of Unix, the classic "I come from a
Windows world" mistake is to have "File" in one place and "file" in
another. Unix is case sensitive.
Sorry if that's obvious to you -- just throwing out possiblities.
On Fri, 09 Mar 2001 05:39:51 GMT, "Stephanie" <wleung@engin.umich.edu>
wrote:
>Thanks - I'm executing it in the server's local directory as an ordinary
>perl script, that's why I have to add the dot. mod_perl is loaded, and I
>don't think it really matters in this case coz all I'm trying to do is run a
>perl script.
>
>What did you mean by case mismatch?
>
>"John Lockwood" <john@particlewave.com> wrote in message
>news:fvqgatoc78ksheu61sg461geo1r44k5s3d@4ax.com...
>> Well, it's a bit off topic, and I'm not really sure, but offhand two
>> other possiblities that come to mind are:
>>
>> 1) mod_perl is not loaded.
>> 2) Case mismatch?
>>
>> Also, what's up with that dot before the backslash? Don't you
>> typically want "/filename" or "/directory/filename"?
>>
>> On Fri, 09 Mar 2001 05:01:29 GMT, "Stephanie" <wleung@engin.umich.edu>
>> wrote:
>>
>> >Hi,
>> >
>> >I'm trying to execute a cgi script in apache written in perl, but when I
>run
>> >it on the server using './<script_name>' I get a 'No such file or
>directory'
>> >error. When I type 'perl <script_name>' it runs. I'm fairly sure that
>apache
>> >was set up correctly, and I've included the path of perl in the first
>line
>> >of the script, and set it to 755.
>> >
>> >Can anybody tell me what's wrong? I'd appreciate it very much.
>> >
>> >Thanks,
>> >Stephanie
>> >
>>
>
------------------------------
Date: Fri, 09 Mar 2001 07:57:44 -0600
From: Michael Carman <mjcarman@home.com>
Subject: Re: FAQ 6.0: Why do I get weird spaces when I print an array of lines?
Message-Id: <3AA8E158.6DC82703@home.com>
Gwyn Judd wrote:
>
> I was shocked! How could Michael Carman <mjcarman@home.com>
> say such a terrible thing:
>
> >The regular FAQ postings have resulted in a lot of messages like this.
> >While its great to see the folks here improving the quality of the
> >answers, I've yet to see anyone say that they've submitted their
> >enhancements for inclusion into future revisions. Have people been
> >doing this silently? (I hope so.)
>
> Ok, just for future reference, the correct address to send things to is
> faq@denver.pm.org?
Well, the FAQ itself says to send things to
perlfaq-suggestions@perl.com, which is where I sent one off to
yesterday. I wasn't sure whether or not faq@denver.pm.org was a good
place to send changes to or just a posting agent. From Uri's post, I now
know that I can send sugesstions there. Is this the preferred address
now? Or do both (presumably) find their way to the same place anyway?
-mjc
------------------------------
Date: 9 Mar 2001 15:34:24 GMT
From: Charles Gimon <gimonca@mirage.skypoint.com>
Subject: Re: Feeding value pairs to ASP scripts?
Message-Id: <98at60$2egb$2@shadow.skypoint.net>
Could you be running into URI encoding issues?
horribly@bogus.com wrote:
: Hi,
: When I setup a perl script cgi-bin form, I frequently like to test it
: by adding ?value0=foo&value2=bar to the URL line in a web browser.
: Now, I'm trying to login to an asp script on a server not in my
: control using LWP and the value pair method and it fails. It also
: fails directly from a web browser. Is there a different "trick" for
: feeding value pairs to asp scripts?
: thanks.
--
Wild new Ubik salad dressing, not | gimonca@skypoint.com
Italian, not French, but an entirely | Minneapolis MN USA
new and different taste treat that's | http://www.skypoint.com/~gimonca
waking up the world! | Safe when taken as directed.
------------------------------
Date: Fri, 09 Mar 2001 14:22:11 GMT
From: lorin@pobox.usit.com.ORG (Lorin Winchester)
Subject: Re: Free Linux account
Message-Id: <nG5q6.15181$tV.2259625@newsrump.sjc.telocity.net>
On Thu, 8 Mar 2001 21:19:57 +0100, Alfred Schetelig <schetelig@web.de> wrote:
>Does anybody know of a free linux account offer on the WEB? Alfred
http://www.freeshell.org or telnet to freeshell.org.
--
Registered Linux User #182034
9:22am up 2 days, 19:59, 2 users, load average: 0.06, 0.06, 0.05
------------------------------
Date: Fri, 9 Mar 2001 10:43:20 -0500
From: "Tulan W. Hu" <twhu@lucent.com>
Subject: FYI - lwp get + https + proxy
Message-Id: <98atnc$767@nntpa.cb.lucent.com>
Recently I was struggling tp get a page from a https server via a proxy
server.
My environment:
Solaris 8,
Perl 5.6.0
libwww-perl-5.50 + a patch
The 5.50 patch is on
(http://sourceforge.net/tracker/index.php?func=detail&aid=403773&group_id=14
630&atid=314630)
Crypt::SSLeay-0.18
The GET command properly retrieves a page from a https server via a proxy
server on above setups.
The libwww-per-5.50 + patch does not work 100% with Crypt::SSLeay-0.22. It
only allows you to access a https server without a proxy. You must use
Crypt::SSLeay-0.18 to get a page from a https server via a proxy server.
------------------------------
Date: Fri, 09 Mar 2001 15:41:25 -0000
From: gbacon@HiWAAY.net (Greg Bacon)
Subject: Re: How do I fetch clipboard content?
Message-Id: <tahud51ao9r097@corp.supernews.com>
In article <slrn9ag7f0.ic5.abigail@tsathoggua.rlyeh.net>,
Abigail <abigail@foad.org> wrote:
: I've the following in my .fvwmrc:
:
: Key F11 A N \
: Exec /opt/netscape/netscape -noraise -remote \
: "openURL(`perl -MTk -e 'print MainWindow->new->SelectionGet'`,\
: new_window)"
$abigail++;
Greg
--
The most exciting phrase to hear in science, the one that heralds new
discoveries, is not "Eureka!" (I found it!) but "That's funny..."
-- Isaac Asimov
------------------------------
Date: Fri, 9 Mar 2001 15:58:36 -0000
From: "Igor Aptekar" <igor_aptekar@programmer.net>
Subject: how do i spawn a new process when using CGI
Message-Id: <g77q6.4830$g63.680067@nnrp3.clara.net>
when my CGI scripts ends (after the print end_html) i want to execute a
separate script independantly.
I try using exec but get a premature end of script headers error.
anyone know how to do this?
thnaks
------------------------------
Date: Fri, 09 Mar 2001 14:26:20 GMT
From: Ken Tuck <webmaster@eyecreate.net>
Subject: Re: Newbies welcome
Message-Id: <3AA910E7.72DF829F@eyecreate.net>
Well said!
Darren wrote:
> This is to all newbies on this and any other newsgroup.
>
> Do not ever be afraid of asking a question on something relevent to the
> newsgroup you are visiting.
> Bear in mind that every single person on any newsgroup was a newbie once, so
> if they slate you for being a newbie then they are hypocrites and should be
> ignored. Do not give up. Everybody learns, even the so called experienced
> though they would often not admit it
--
Cheers!
Ken Tuck
EyeCreate Inc.
Net~Solutions
Design - Hosting - E-Commerce
webmaster@eyecreate.net
http://www.eyecreate.net/
ph: 705.755.1120
fx: 705.743.9259
------------------------------
Date: Fri, 09 Mar 2001 15:03:05 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: number
Message-Id: <65shats1c7imca57bni7st60mf39ujs141@4ax.com>
Josef Moellers wrote:
>> > $xx = "55";
>>
>> Why the quotation marks?
>
>Look at the OP's question! It had quotation marks, too!
Nope. The original scalar was in quotation marks, but not the result he
wanted.
: In my script i've got some variables with .00 behind it.
: for example $xx="55.00"
:
: Which line do i need so that $xx will contain 55
Thus
$xx += 0;
will do nicely.
--
Bart.
------------------------------
Date: Fri, 09 Mar 2001 15:38:53 GMT
From: Ala Qumsieh <aqumsieh@hyperchip.com>
Subject: Re: number
Message-Id: <7apufr2bm6.fsf@merlin.hyperchip.com>
"Waarddebon" <Waarddebon@chello.nl> writes:
> In my script i've got some variables with .00 behind it.
> for example $xx="55.00"
>
> Which line do i need so that $xx will contain 55 (so without the .00)
> Thanks in advance
I'm surprised that no body gave the obvious answer:
$xx = int $xx;
Note that this truncates so 9.9 becomes 9. If you want to round to the
nearest integer, then use sprintf() as outlined in another response.
--Ala
------------------------------
Date: Fri, 09 Mar 2001 14:59:37 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: pack double-network-order
Message-Id: <6urhat00rlid6vvbih64s12vtq3lvsddu6@4ax.com>
Daniel Heiserer wrote:
>> I think floating point is native format only. What you can do, is
>> reverse() on the packed string, if your native format isn't big-endian.
>
>pretty bad when I packed with "d10" before. this wold work ONLY if I
>have only 1 value. The key-thing is that I use the binary
>representation is that I need to pack tons of data.
>
>I know that there is the "d" option, but that is native only.
Ah. So it works? Then, pack individual floats, reverse them, and join
that result. Like:
$packed = join '', map { reverse pack 'd', $_ } @float;
It'll be slower than ( pack 'd10', @float ), I guess.
--
Bart.
------------------------------
Date: Fri, 09 Mar 2001 07:00:50 -0800
From: John Lockwood <john@particlewave.com>
Subject: Re: Programmer with vision required
Message-Id: <aurhat0ubhnkv06ailbuh04b83aak7v86h@4ax.com>
In my company I get 50% of net revenue on all software I write. Uncle
Sam and various other state and local governments get the other 50%.
;-)
John
On Fri, 09 Mar 2001 06:21:28 GMT, "Jeff S Wheeler"
<jsw+nospam@five-elements.com> wrote:
>He's also not an EOE. Discriminating against the blind is against the law in
>the US.
>
>Beyond that note that this guy's posting does nothing but offer fractions of
>net revenues off products, and we all know how mismanaged dot-coms can make
>a negative net revenue off their products...:)
>
>- jsw
>
>
------------------------------
Date: 9 Mar 2001 15:16:03 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: Quick script question - I'm lost
Message-Id: <98as3j$st6$2@mamenchi.zrz.TU-Berlin.DE>
According to Abigail <abigail@foad.org>:
> map {$sum += $_} @{$hosts}{@hosts};
Bah, that's empty propaganda for map in void context.
$sum += $_ for @{$hosts}{@hosts};
Anno
------------------------------
Date: 9 Mar 2001 15:27:36 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: Quick script question - I'm lost
Message-Id: <98asp8$st6$3@mamenchi.zrz.TU-Berlin.DE>
According to Abigail <abigail@foad.org>:
> Ron Auer (rrauer@mitre.org) wrote on MMDCCXLVI September MCMXCIII in
> <URL:news:3AA80D3F.3BD26F38@mitre.org>:
> @@ Abigail,
> @@
> @@ Thanks for the rapid reply.
> @@
> @@ I am having problems making this work.
>
> KERNEL PANIC!
>
> Reply seen without encountering context.
[...]
Thanks, that made me grin a couple of times. I'd say, very well done, if
it weren't pretentious of me to say so.
Anno
------------------------------
Date: Fri, 09 Mar 2001 15:29:38 GMT
From: killeria@yahoo.com (sP6)
Subject: script change problem under mod_perl
Message-Id: <3aa8f388.26739744@news.ut.ee>
hi,
I have apache server with mod_perl. When I change code in a script
(NOT module or required file) the server still runs the old version(s)
of script for some time by random turns. I have read that the mod_perl
should check scripts for changes and recompile them when timestamp of
script changes. Why stay some proccesses unchanged?
sP6.
------------------------------
Date: Fri, 9 Mar 2001 17:11:59 +0200
From: "Michael Rolfe" <mumble[anti-spam]@maths.uct.ac.za>
Subject: Trying to capture current directory in variable
Message-Id: <98artf$16es$1@news.adamastor.ac.za>
Hi.
I am a Perl newbie writing a program that does a tree-walk; I want to store
the original working directory in a variable (without using files, as write
access may not be assumed). The motivation is to change back to that
directory as part of program completion.
I am using ActiveState perl, v5.6.0 under Windows 98.
It seems to me that what I should do is
$OriginalDirectory = `cd` ;
but this produces the output of cd on STDOUT and the variable
$OriginalDirectory remains empty.
I'd appreciate some insight into what I'm doing wrong and how to correct it.
Thanks
------------------------------
Date: Fri, 09 Mar 2001 15:18:01 +0000
From: Tom Scheper <tom@power.net.uk>
Subject: Re: Trying to capture current directory in variable
Message-Id: <oushatsp7ua5a5rco98js6du17airf6fik@4ax.com>
On Fri, 9 Mar 2001 17:11:59 +0200, "Michael Rolfe"
<mumble[anti-spam]@maths.uct.ac.za> shed a beam of light on us:
>Hi.
>
>I am a Perl newbie writing a program that does a tree-walk; I want to store
>the original working directory in a variable (without using files, as write
>access may not be assumed). The motivation is to change back to that
>directory as part of program completion.
>
>I am using ActiveState perl, v5.6.0 under Windows 98.
>
>It seems to me that what I should do is
>
>$OriginalDirectory = `cd` ;
`cd` doesn't return anything. The reason why you might see a path if
you type it in the shell you're using is because your shell shows it,
not the cd command. Try doing it this way:
$OriginalDirectory=chomp(`pwd`);
There will more than likely be a perl equivalent, which is better to
use, but I don't know by heart what it is.
-=Cornelis
------------------------------
Date: Fri, 09 Mar 2001 15:27:16 GMT
From: rgarciasuarez@free.fr (Rafael Garcia-Suarez)
Subject: Re: Trying to capture current directory in variable
Message-Id: <slrn9ahti9.4j5.rgarciasuarez@rafael.kazibao.net>
Michael Rolfe wrote in comp.lang.perl.misc:
>
> I am a Perl newbie writing a program that does a tree-walk; I want to store
> the original working directory in a variable (without using files, as write
> access may not be assumed).
The standard Cwd module does this, in a portable way.
--
Rafael Garcia-Suarez / http://rgarciasuarez.free.fr/
------------------------------
Date: 9 Mar 2001 15:49:27 GMT
From: Charles Gimon <gimonca@mirage.skypoint.com>
Subject: Re: using blat in a perl script to send form input
Message-Id: <98au27$2f28$2@shadow.skypoint.net>
The Mail::Sendmail module from CPAN is a possible alternative
to blat in cases like this. Blat is nice, but using the module
means you don't have to call an outside executable.
--
Wild new Ubik salad dressing, not | gimonca@skypoint.com
Italian, not French, but an entirely | Minneapolis MN USA
new and different taste treat that's | http://www.skypoint.com/~gimonca
waking up the world! | Safe when taken as directed.
------------------------------
Date: 9 Mar 2001 15:45:54 GMT
From: Charles Gimon <gimonca@mirage.skypoint.com>
Subject: Re: Win32::ODBC - can get info from Access97 database, but can't modify
Message-Id: <98atri$2f28$1@shadow.skypoint.net>
Have you double-checked the datatypes in Access? Is it expecting
the datatype that you're giving it?
Try capturing the error with a $Data->Error(); (where $Data is your
object). Sometimes this can help identify the problem.
Also try capturing the entire SQL statement in a string and explicitly
printing it out for debugging--sometimes you can just spot the problem
this way.
--
Wild new Ubik salad dressing, not | gimonca@skypoint.com
Italian, not French, but an entirely | Minneapolis MN USA
new and different taste treat that's | http://www.skypoint.com/~gimonca
waking up the world! | Safe when taken as directed.
------------------------------
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 V10 Issue 454
**************************************
