[24132] in Perl-Users-Digest
Perl-Users Digest, Issue: 6326 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Mar 29 09:05:50 2004
Date: Mon, 29 Mar 2004 06: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)
Perl-Users Digest Mon, 29 Mar 2004 Volume: 10 Number: 6326
Today's topics:
[ANNOUNCE] Term::ReadLine::Zoid <j.g.karssenberg@student.utwente.nl>
Re: data types anuradha.k.r@sify.com
Re: data types (Anno Siegel)
Re: fork and wait... <svetjNOSPAM@tiscali.it>
Formmail simpe question <no_spam@vip.hr>
Re: Formmail simpe question <tassilo.parseval@rwth-aachen.de>
Re: Formmail simpe question (Anno Siegel)
Re: Help: Using the Reply-To: header on sending email <bik.mido@tiscalinet.it>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 29 Mar 2004 12:46:39 GMT
From: Jaap Karssenberg <j.g.karssenberg@student.utwente.nl>
Subject: [ANNOUNCE] Term::ReadLine::Zoid
Message-Id: <HvC8y5.13Cu@zorch.sf-bay.org>
Today new on CPAN: Term::ReadLine::Zoid
ABOUT
This package provides a set of modules that form an interactive input
buffer written in plain perl with minimal dependencies. It features
almost all key-bindings described in the posix spec for the sh(1)
utility with some extensions like multiline editing; this includes a
vi-command mode with a save-buffer (for copy-pasting) and an undo-stack.
It is compatible with the Term::ReadLine interface, so it can be used
with perl programs using this interface.
DEPENDENCIES
The only real dependencies for this package are Term::ReadKey and
AutoLoader which are available from cpan.
One function in the vi command mode needs File::Temp, but as long as you
don't use this function you don't need the module.
You might also want to consider to install Env::PS1 if you want a fancy
prompt.
--
) ( Jaap Karssenberg || Pardus [Larus] | |0| |
: : http://pardus-larus.student.utwente.nl/~pardus | | |0|
) \ / ( |0|0|0|
",.*'*.," Proud owner of "Perl6 Essentials" 1st edition :) wannabe
------------------------------
Date: 29 Mar 2004 01:39:43 -0800
From: anuradha.k.r@sify.com
Subject: Re: data types
Message-Id: <57efaf35.0403290139.4b8af82d@posting.google.com>
Hi,
Well let me be little more clear.The format of the file which I am
readiing is what I am actually looking for.In pl/1 irrespective of
what the data format is ie say integer/character/bits when read into a
bit(16) say
READ FILE INTO(X) where X is X(128) BIT(16),X will always give a
binary value ie the character/integer represented as 16 bit values.So
you need not know whether the data in file is fixed binary or varying
binary.However when I am porting this to perl ,I need to worry about
the exact data format in the file.
Thatz the reason why I asked that it would be necessary that my data
in file is in directly binary format(made of 1s and 0s) let it be
representing a character or a decimal value?
In my pl/1 program I am manipulating the bitstrings only to compute
some values.
Only if I am sure of the data format in the file in perl can I go for
options to manipulate them in my program,and see whether I need
pack/unpack etc.
I hope now its more clear?
Thanx,
AKR.
Uri Guttman <uri@stemsystems.com> wrote in message news:<x7d670yu7w.fsf@mail.sysarch.com>...
> >>>>> "akr" == anuradha k r <anuradha.k.r@sify.com> writes:
>
> akr> I have pl/1 program which I am porting to perl.My problem is I
> akr> have a file which I read into a BIT array(in pl/1) and later use
> akr> the bits as required in the program.My question here is since I
> akr> don't have a data type representation for BIT,CHAR etc in perl,
> akr> how will I handle it in perl?What I meant is if my input file has
> akr> any type of data,when I read the data (internally it reads as
> akr> bits only) and assign it to a BIT array,I actually get the bit
> akr> represenattion of the character in the file into my BIT
> akr> variable(in pl/1).Does perl have any provision like that?If I
> akr> have get 1s and 0s after reading from a file in perl,isn't it
> akr> required that my data in my file is also of that type ie 1s and
> akr> 0s?
>
> you need to be clearer about the exact format of the data in the
> file. perl can read and process binary data with the pack/unpack
> functions. also the bit::vector module can do most anything with bit
> data. you mention CHAR type in pl/1 but perl handles chars with no
> trouble. the biggest issue is how were the bits written out. ar ethey
> fixed bit strings or varying? if varying, do you know the exact binary
> format? if fixed, are they padded to 8 bits or bit aligned? you haven't
> provided enough information for me to give you any more help. and i am
> one of those odd perl hackers who knew pl/1 very well as i wrote/manage
> development for the entire runtime lib of pl/1 including bit strings.
>
> uri
------------------------------
Date: 29 Mar 2004 11:08:38 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: data types
Message-Id: <c4903m$ki4$1@mamenchi.zrz.TU-Berlin.DE>
<anuradha.k.r@sify.com> wrote in comp.lang.perl.misc:
[please don't top-post]
> Hi,
> Well let me be little more clear.The format of the file which I am
> readiing is what I am actually looking for.In pl/1 irrespective of
> what the data format is ie say integer/character/bits when read into a
> bit(16) say
> READ FILE INTO(X) where X is X(128) BIT(16),X will always give a
> binary value ie the character/integer represented as 16 bit values.So
> you need not know whether the data in file is fixed binary or varying
> binary.However when I am porting this to perl ,I need to worry about
> the exact data format in the file.
> Thatz the reason why I asked that it would be necessary that my data
> in file is in directly binary format(made of 1s and 0s) let it be
> representing a character or a decimal value?
> In my pl/1 program I am manipulating the bitstrings only to compute
> some values.
> Only if I am sure of the data format in the file in perl can I go for
> options to manipulate them in my program,and see whether I need
> pack/unpack etc.
> I hope now its more clear?
Not really.
I guess what you're saying is:
I have this file, and this is how I read it in PL/1. How can I read
it in Perl, or, if I can't, how should I re-format it so that I can.
The problem is that you have described your problem in terms of PL/1
which few people here speak fluently. Neither the specification
"...where X is X(128) BIT(16)", nor the terms "fixed binary" and
"varying binary" have specific meaning outside PL/1 terminology.
Anno
[TOFU snipped]
------------------------------
Date: Mon, 29 Mar 2004 14:32:45 +0200
From: "svetj" <svetjNOSPAM@tiscali.it>
Subject: Re: fork and wait...
Message-Id: <c4953f$gh1$1@lacerta.tiscalinet.it>
Thanks to all.
I chose now best solution for my problem.
bye ;-)
------------------------------
Date: Mon, 29 Mar 2004 10:45:34 +0200
From: dove_g <no_spam@vip.hr>
Subject: Formmail simpe question
Message-Id: <vbof601m9a9si78a5jr06ujg5upj8isnd8@4ax.com>
Hello.
I need simple thing but can't find in manual of formmail.pl.
I would like that following:
<INPUT type="hidden" name="<%=(Session("Sif"&X))%>" value="
<%=Session("Kol"&X)%>">
0105001: 10
But I would like that I receive this in that format:
0105001; 10
So, I need that : is replaced with ;. Is that somehow possible? I need
that for importing in my application, first is Code of article and
second one is quantity.
Thank you for help.
------------------------------
Date: 29 Mar 2004 09:31:36 GMT
From: "Tassilo v. Parseval" <tassilo.parseval@rwth-aachen.de>
Subject: Re: Formmail simpe question
Message-Id: <c48qdo$esf$1@nets3.rz.RWTH-Aachen.DE>
Also sprach dove_g:
> Hello.
> I need simple thing but can't find in manual of formmail.pl.
You shouldn't be using formmail.pl at all in the first place. It is
known to be a particularly bad example of Perl with security holes big
enough to drive a truck through. Consider using the properly written
replacement at
<http://nms-cgi.sourceforge.net/>
Don't just consider. Do it. Now.
> I would like that following:
>
><INPUT type="hidden" name="<%=(Session("Sif"&X))%>" value="
><%=Session("Kol"&X)%>">
>
> 0105001: 10
>
>
> But I would like that I receive this in that format:
>
> 0105001; 10
Having said the above, this group is not knowing formmail.pl's code by
heart and so it can't tell you which part of the code possibly needs to
be modified (and don't even think of dumping its source into this group).
Tassilo
--
$_=q#",}])!JAPH!qq(tsuJ[{@"tnirp}3..0}_$;//::niam/s~=)]3[))_$-3(rellac(=_$({
pam{rekcahbus})(rekcah{lrePbus})(lreP{rehtonabus})!JAPH!qq(rehtona{tsuJbus#;
$_=reverse,s+(?<=sub).+q#q!'"qq.\t$&."'!#+sexisexiixesixeseg;y~\n~~dddd;eval
------------------------------
Date: 29 Mar 2004 11:18:20 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: Formmail simpe question
Message-Id: <c490ls$ki4$3@mamenchi.zrz.TU-Berlin.DE>
Tassilo v. Parseval <tassilo.parseval@post.rwth-aachen.de> wrote in comp.lang.perl.misc:
[...]
> be modified (and don't even think of dumping its source into this group).
Hehe.
"Gebranntes Kind scheut das Feuer"
Anno
------------------------------
Date: Mon, 29 Mar 2004 14:20:01 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: Help: Using the Reply-To: header on sending email
Message-Id: <7u3g60l913mnqi4a42165jteq36et16led@4ax.com>
On 28 Mar 2004 21:07:59 GMT, anno4000@lublin.zrz.tu-berlin.de (Anno
Siegel) wrote:
>> or (as is always worth reminding!)
>>
>> Reply-To => $reply_to,
>
>...but quotes are needed on the other side of "=>". "Reply-To" is not a
>valid identifier, so
Hehe, I didn't notice that! Fortunately I do quote keys almost always
anyway...
Michele
--
you'll see that it shouldn't be so. AND, the writting as usuall is
fantastic incompetent. To illustrate, i quote:
- Xah Lee trolling on clpmisc,
"perl bug File::Basename and Perl's nature"
------------------------------
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 6326
***************************************
