[27868] in Perl-Users-Digest
Perl-Users Digest, Issue: 9232 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed May 17 18:05:58 2006
Date: Wed, 17 May 2006 15:05:02 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Wed, 17 May 2006 Volume: 10 Number: 9232
Today's topics:
chdir ($variable) maheshpop1@gmail.com
Re: chdir ($variable) <David.Squire@no.spam.from.here.au>
Re: chdir ($variable) maheshpop1@gmail.com
Re: chdir ($variable) maheshpop1@gmail.com
new CPAN modules at Wed May 17 2006 (Randal Schwartz)
Re: perl is keeping my memory <pilsl@goldfisch.at>
Re: script maheshpop1@gmail.com
transfering a string from client to server without dead <pilsl@goldfisch.at>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 17 May 2006 03:19:21 -0700
From: maheshpop1@gmail.com
Subject: chdir ($variable)
Message-Id: <1147861160.993594.204980@j33g2000cwa.googlegroups.com>
Hi Guys,
the following piece of code doesnt seem to work
my $folder= $hash{working_directory};
chdir("$folder") or die "can't change dir $folder" ;
I printed out the output and checked if the the variable $folder was
being loaded and it was being loaded correctly.
while this works if I put in the absolute path.
chdir("/test/rep") or die "can't change dir /test/rep" ;
hmmmm any thoughts.
cheers,
pop.
------------------------------
Date: Wed, 17 May 2006 11:42:35 +0100
From: David Squire <David.Squire@no.spam.from.here.au>
Subject: Re: chdir ($variable)
Message-Id: <e4eumr$pl9$1@news.ox.ac.uk>
maheshpop1@gmail.com wrote:
> Hi Guys,
>
> the following piece of code doesnt seem to work
>
> my $folder= $hash{working_directory};
> chdir("$folder")
Why are you quoting that variable?
> or die "can't change dir $folder" ;
Perl is your friend. Let it help by telling what went wrong:
or die "can't change dir $folder: $!";
>
> I printed out the output and checked if the the variable $folder was
> being loaded and it was being loaded correctly.
>
> while this works if I put in the absolute path.
>
> chdir("/test/rep") or die "can't change dir /test/rep" ;
>
> hmmmm any thoughts.
hmmmm. Are you sure that the working directory of your script is what
you think it is? Quick and dirty check: print `pwd`;
DS
------------------------------
Date: 17 May 2006 03:43:19 -0700
From: maheshpop1@gmail.com
Subject: Re: chdir ($variable)
Message-Id: <1147862599.081270.103640@j73g2000cwa.googlegroups.com>
oh yeah forgot to add it throws an error
"cant change dir /test/rep
No such file or directory at custom.pl at like 156"
any ideas,
cheers,
pop
------------------------------
Date: 17 May 2006 03:48:12 -0700
From: maheshpop1@gmail.com
Subject: Re: chdir ($variable)
Message-Id: <1147862892.832786.276750@g10g2000cwb.googlegroups.com>
Hi David,
Still learning, I put in the $! and it gave me this error
"can't change dir /test/rep/
No such file or directory at custom.pl line 156."
The working dir of the script is /users/XXX/perlscripts/ and I am
trying to access a folder at the home level /test/rep to run a command
in that folder.
pop
------------------------------
Date: Wed, 17 May 2006 04:42:06 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules at Wed May 17 2006
Message-Id: <IzE7q6.25w@zorch.sf-bay.org>
The following modules have recently been added to or updated in the
Comprehensive Perl Archive Network (CPAN). You can install them using the
instructions in the 'perlmodinstall' page included with your Perl
distribution.
WWW-Blogger-2006.0516
http://search.cpan.org/~ermeyers/WWW-Blogger-2006.0516/
----
File-CacheDir-1.29
http://search.cpan.org/~earl/File-CacheDir-1.29/
Perl module to aid in keeping track and cleaning up files, quickly and without a cron $Id: CacheDir.pm,v 1.22 2006/05/17 00:05:34 earl Exp $
----
Time-UTC-Now-0.001
http://search.cpan.org/~zefram/Time-UTC-Now-0.001/
determine current time in UTC correctly
----
Database-Schema-Config-.02
http://search.cpan.org/~saxjazman/Database-Schema-Config-.02/
Perl extension for storing generic config strings with revision control in a table
----
Serdisp-0.01
http://search.cpan.org/~fuzz/Serdisp-0.01/
Perl extension for blah blah blah
----
Time-UTC-Now-0.000
http://search.cpan.org/~zefram/Time-UTC-Now-0.000/
determine current time in UTC correctly
----
IO-Socket-TIPC-1.04
http://search.cpan.org/~infinoid/IO-Socket-TIPC-1.04/
TIPC sockets for Perl
----
Net-Scan-HTTP-Server-Version-0.03
http://search.cpan.org/~mcantoni/Net-Scan-HTTP-Server-Version-0.03/
grab HTTP server version
----
Gantry-3.31
http://search.cpan.org/~tkeefer/Gantry-3.31/
Web application framework for mod_perl, cgi, etc.
----
SVK-Log-Filter-Babelfish-0.0.1
http://search.cpan.org/~mndrix/SVK-Log-Filter-Babelfish-0.0.1/
translate log messages using online services
----
version-0.59_04
http://search.cpan.org/~jpeacock/version-0.59_04/
Perl extension for Version Objects
----
OpenGuides-0.54_01
http://search.cpan.org/~dom/OpenGuides-0.54_01/
A complete web application for managing a collaboratively-written guide to a city or town.
----
IPC-Locker-1.450
http://search.cpan.org/~wsnyder/IPC-Locker-1.450/
Distributed lock handler
----
Kwiki-QuickWAFL-0.02
http://search.cpan.org/~cordata/Kwiki-QuickWAFL-0.02/
Causes configured WALF methods to have their contents processed by the normal Kwiki formatting engine.
----
Moose-0.09_02
http://search.cpan.org/~stevan/Moose-0.09_02/
Moose, it's the new Camel
----
HTTP-CryptoCookie-1.12
http://search.cpan.org/~dparis/HTTP-CryptoCookie-1.12/
Perl extension for encrypted HTTP cookies
----
Wiki-Toolkit-Plugin-Diff-0.10
http://search.cpan.org/~dom/Wiki-Toolkit-Plugin-Diff-0.10/
format differences between two Wiki::Toolkit pages
----
SVK-Log-Filter-Stats-0.0.1
http://search.cpan.org/~mndrix/SVK-Log-Filter-Stats-0.0.1/
display statistics for a repository or working copy
----
WWW-YouTube-2006.0516
http://search.cpan.org/~ermeyers/WWW-YouTube-2006.0516/
YouTube Developer Interface
----
Gtk2-Ex-PodViewer-0.15
http://search.cpan.org/~gbrown/Gtk2-Ex-PodViewer-0.15/
a Gtk2 widget for displaying Plain old Documentation (POD).
----
Data-Average-0.01
http://search.cpan.org/~dmaki/Data-Average-0.01/
Hold Data Set To Calculate Average
----
Data-FormValidator-Constraints-Japanese-0.02
http://search.cpan.org/~dmaki/Data-FormValidator-Constraints-Japanese-0.02/
----
File-Find-Rule-0.29
http://search.cpan.org/~rclamp/File-Find-Rule-0.29/
Alternative interface to File::Find
----
XML-DT-0.45
http://search.cpan.org/~ambs/XML-DT-0.45/
a package for down translation of XML files
----
TeX-Encode-0.6
http://search.cpan.org/~timbrody/TeX-Encode-0.6/
Encode/decode Perl utf-8 strings into TeX
----
CGI-Builder-PathInfoMagic-0.01
http://search.cpan.org/~tomyhero/CGI-Builder-PathInfoMagic-0.01/
Get page name from PAHT_INFO instead of p
----
sqlpp-0.05
http://search.cpan.org/~karasik/sqlpp-0.05/
SQL preprocessor
----
InSilicoSpectro-0.9.20
http://search.cpan.org/~alexmass/InSilicoSpectro-0.9.20/
Open source Perl library for proteomics
----
Catalyst-Plugin-Authentication-Credential-PAM-0.01
http://search.cpan.org/~rgarcia/Catalyst-Plugin-Authentication-Credential-PAM-0.01/
Authenticate a user against PAM
----
Image-Flight-Suborbital-0.01
http://search.cpan.org/~ikluft/Image-Flight-Suborbital-0.01/
draw diagram of suborbital rocket flight profile
----
Mac-PropertyList-1.28
http://search.cpan.org/~bdfoy/Mac-PropertyList-1.28/
work with Mac plists at a low level
----
Geo-ReadGRIB-0.01
http://search.cpan.org/~frankcox/Geo-ReadGRIB-0.01/
Perl extension that gives read access to GRIB "GRIdded Binary" format Weather data files.
----
Mac-PropertyList-1.26
http://search.cpan.org/~bdfoy/Mac-PropertyList-1.26/
work with Mac plists at a low level
----
Algorithm-RandomMatrixGeneration-0.03
http://search.cpan.org/~anaghakk/Algorithm-RandomMatrixGeneration-0.03/
Perl module to generate matrix given the marginals.
----
Jcode-2.05
http://search.cpan.org/~dankogai/Jcode-2.05/
Japanese Charset Handler
----
Bundle-Modules-2006.0516
http://search.cpan.org/~ermeyers/Bundle-Modules-2006.0516/
All current *stable* bundles of modules in CPAN
----
WWW-Babelfish-0.14
http://search.cpan.org/~durist/WWW-Babelfish-0.14/
Perl extension for translation via Babelfish or Google
----
Bundle-Modules-2006.0515
http://search.cpan.org/~ermeyers/Bundle-Modules-2006.0515/
All current *stable* bundles of modules in CPAN
If you're an author of one of these modules, please submit a detailed
announcement to comp.lang.perl.announce, and we'll pass it along.
print "Just another Perl hacker," # the original
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Wed, 17 May 2006 12:33:49 +0200
From: peter pilsl <pilsl@goldfisch.at>
Subject: Re: perl is keeping my memory
Message-Id: <446afc0a$0$591$79720d31@newsreader.inode.at>
xhoster@gmail.com wrote:
>
> ...
>> One single request that needs 200m for about 2 seconds will take this
>> 200m away from the system for the rest of its life.
>
> Make the rest of its life be very short.
>
> Make it a forking server which does the time consuming start up once, then
> forks children upon each request. The children can do the memory consuming
> parts, then exit, freeing up their memory.
>
thnx. Thats what I did. I was a bit posessed by the idea of a preforking
server and lost the focus somehow.
I now have a forking server thats running very nice and consuming very
little memory ;)
thnx
peter
------------------------------
Date: 17 May 2006 03:26:16 -0700
From: maheshpop1@gmail.com
Subject: Re: script
Message-Id: <1147861576.301148.246180@j33g2000cwa.googlegroups.com>
I guess you can start off with going through the following parts of
Perl
File access, File parsing and Regex. This should show give you point
knowledge on how to parse files and search for specific sites.
http://www.unix.org.ua/orelly/perl/learn/ch10_01.htm
cheers,
Mahesh.
------------------------------
Date: Wed, 17 May 2006 12:39:12 +0200
From: peter pilsl <pilsl@goldfisch.at>
Subject: transfering a string from client to server without deadlock?
Message-Id: <446afd4e$0$581$79720d31@newsreader.inode.at>
I use Net::Daemon for a very simple server-client-szenario
client is sending a string to the server and the server is processing
the string and returning a answerstring to the client and the client is
terminating.
Problem: the string is very long and can contain virtually any character
(its the output of freeze() from the Storable-Module which serializes
even complex hashes)
So how does the Server know when the Client has finished sending its string?
I tried several attempts that all works, but I'm sure they will fail on
certain data:
* the client sends the length of the string first, so the server knows
how much data it needs to wait for. (this will sure fail when using
utf8-encoded data and client/server will be on different machines with
different perls)
* I use a very complex "EOF"-pattern like \n\0\0\0\0\n and pray to my
gods that this pattern will never be part of the string.
I am sure that there is a much better/simple/prooved solution to this
problem that must be a standard-problem.
thnx,
peter
------------------------------
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 9232
***************************************