[19548] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 1743 Volume: 10

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Sep 14 00:09:19 2001

Date: Thu, 13 Sep 2001 21:05:06 -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: <1000440306-v10-i1743@ruby.oce.orst.edu>
Content-Type: text

Perl-Users Digest           Thu, 13 Sep 2001     Volume: 10 Number: 1743

Today's topics:
        Documentation & Install... <jasonb@computer.org>
    Re: Documentation & Install... (Martien Verbruggen)
    Re: Documentation & Install... (Chris Fedde)
    Re: Documentation & Install... (Tad McClellan)
    Re: http server validation <joe+usenet@sunstarsys.com>
    Re: implicit functions <pilsl_@goldfisch.at>
    Re: Need Help (Martien Verbruggen)
    Re: Novice:-How do i cleanUp of privious entries if for (David Efflandt)
        NT Share??? michael.e.grimes.nospam@fritolay.com
    Re: NT Share??? (Chris Fedde)
    Re: Printing in Perl <me@REMOVETHIStoao.net>
        Problems with format (perlform) and carriage returns... (James Minor)
    Re: Problems with format (perlform) and carriage return (Tad McClellan)
    Re: Running perl scripts (Tad McClellan)
    Re: Running perl scripts (Gary E. Ansok)
    Re: Running perl scripts (Garry Williams)
        Source Code Bracket Matching Utility Needed (Ralph Freshour)
    Re: Source Code Bracket Matching Utility Needed (Chris Fedde)
    Re: Why the client still waits for input? <yuwen@microtek.com.cn>
        xml parser (shan)
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: Fri, 14 Sep 2001 02:37:21 GMT
From: Jason Boerner <jasonb@computer.org>
Subject: Documentation & Install...
Message-Id: <3BA16D60.7070408@computer.org>

So I have this cool perl code that does something really neat which I 
would like to package up and make "professional" (before I submit it to 
CPAN).  In the old days I used to use wrapman.pl to package up my script 
with its man page and everyone was happy.

Now days things are different with POD and with many packages including 
an install method.  Can someone please point me toward a FAQ on how to 
build these or even better, some code snippet that I can just wrap my 
modules.

Thank You



------------------------------

Date: Fri, 14 Sep 2001 03:59:18 GMT
From: mgjv@tradingpost.com.au (Martien Verbruggen)
Subject: Re: Documentation & Install...
Message-Id: <slrn9q304m.n8d.mgjv@verbruggen.comdyn.com.au>

On Fri, 14 Sep 2001 02:37:21 GMT,
	Jason Boerner <jasonb@computer.org> wrote:
> So I have this cool perl code that does something really neat which I 
> would like to package up and make "professional" (before I submit it to 
> CPAN).  In the old days I used to use wrapman.pl to package up my script 
> with its man page and everyone was happy.
> 
> Now days things are different with POD and with many packages including 
> an install method.  Can someone please point me toward a FAQ on how to 
> build these or even better, some code snippet that I can just wrap my 
> modules.

To create module packages that 'conform' to the standard ones:

$ man h2xs

With a bit of tweaking you should be able to use it for distributions
without modules (e.g. just scripts) as well. It'll write a bare bones
Makefile.PL and MANIFEST for you, which you can use to package up a
distribution.

$ perl Makefile.PL
$ make dist

You probably also want to read the ExtUtils::MakeMaker documentation.

Before you submit this module code to CPAN, you might want to check
that the name space you're taking up is ok.

More information at:
http://www.cpan.org/modules/index.html
http://www.cpan.org/modules/04pause.html#namespace

Martien
-- 
Martien Verbruggen              | 
Interactive Media Division      | If at first you don't succeed, try
Commercial Dynamics Pty. Ltd.   | again. Then quit; there's no use
NSW, Australia                  | being a damn fool about it.


------------------------------

Date: Fri, 14 Sep 2001 04:00:31 GMT
From: cfedde@fedde.littleton.co.us (Chris Fedde)
Subject: Re: Documentation & Install...
Message-Id: <zhfo7.394$Owe.253169152@news.frii.net>

In article <3BA16D60.7070408@computer.org>,
Jason Boerner  <jasonb@computer.org> wrote:
>So I have this cool perl code that does something really neat which I 
>would like to package up and make "professional" (before I submit it to 
>CPAN).  In the old days I used to use wrapman.pl to package up my script 
>with its man page and everyone was happy.
>
>Now days things are different with POD and with many packages including 
>an install method.  Can someone please point me toward a FAQ on how to 
>build these or even better, some code snippet that I can just wrap my 
>modules.
>
>Thank You
>

If it's a script that you want to bundle take a look at sdist at 

    http://www.cpan.org/authors/id/R/RK/RKOBES/sdist

It might be helpfull.

If it's a module look at h2xs and the ExtUtils::MakeMaker manual pages.

Good Luck
-- 
    This space intentionally left blank


------------------------------

Date: Fri, 14 Sep 2001 04:04:28 GMT
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Documentation & Install...
Message-Id: <slrn9q2tmj.i07.tadmc@tadmc26.august.net>

Jason Boerner <jasonb@computer.org> wrote:

>So I have this cool perl code that does something really neat which I 
>would like to package up and make "professional" (before I submit it to 
>CPAN).


>Can someone please point me toward a FAQ on how to 
>build these 


   perldoc -q module

      "How do I create a module?"

and also:

   perldoc perlmodlib

     "constructing new Perl modules and finding existing ones"


In short, use the 'h2xs' program to start off with.

-- 
    Tad McClellan                          SGML consulting
    tadmc@augustmail.com                   Perl programming
    Fort Worth, Texas


------------------------------

Date: 13 Sep 2001 20:45:36 -0400
From: Joe Schaefer <joe+usenet@sunstarsys.com>
Subject: Re: http server validation
Message-Id: <m3sndqeh1r.fsf@mumonkan.sunstarsys.com>

brian d foy <comdog@panix.com> writes:

> In article <rG7o7.377$Owe.256334848@news.frii.net>, 
> cfedde@fedde.littleton.co.us (Chris Fedde) wrote:
> 
> > In article <9nr0gh$fiq$1@wanadoo.fr>,
> > Herve Schlecht <herve.schlecht@wanadoo.fr> wrote:
> 
> > >I search a solution to validate remotly that a http server is alive.
> 
> > perl -MLWP::Simple -le 'print head "http://www.cpan.org"'
> 
> you don't need to print the response since head() in
> scalar context tells you if it were successful or not.
> 
> perl -MLWP::Simple -le 'print "Alive!" if head "http://www.cpan.org"'
> 
> however, this can only tell you that the server is alive. 

More precisely- this only tells you if the server returns a _successful_ 
response for the requested resource.  In particular, a http server can 
be "alive" without requiring the existence of "index.html".

> you have to work harder to check if the server is not alive since some
> servers do not handle HEAD correctly. ;)

I'm not sure I understand your point here- I would think that simply
having a listener on port 80 would constitute most people's definition 
of a "live" server.

Whether or not it's a proper http server is subject the requirements 
of whatever HTTP version suits your fancy, but in any case *I* would
consider any listening server that responds to HTTP*.* requests
with HTTP*.* responses (successful or otherwise) to be "alive".  
Failure to return a well-formed response would indicate it's not 
a "live" HTTP*.* server.

Are you suggesting there is a third category?

-- 
Joe Schaefer         "Experience is one thing you can't get for nothing."
                                               -- Oscar Wilde



------------------------------

Date: Fri, 14 Sep 2001 02:49:14 +0200
From: peter pilsl <pilsl_@goldfisch.at>
Subject: Re: implicit functions
Message-Id: <3ba15410$1@e-post.inode.at>

peter pilsl wrote:

thnx to all of you.
I cant reduce the returned parameters to one, cause the whole stuff is 
running recursive and two values have to be delivered through the whole 
recursion.
I decided to use joes version, because it doenst need to introduce new 
variables and handles the two-parameter-problem ..
s/X/ sub { $b.=$_[0]; $_[1] } -> ( fu() ) /e


thnx,
peter


-- 
peter pilsl
pilsl_@goldfisch.at
http://www.goldfisch.at



------------------------------

Date: Thu, 13 Sep 2001 23:55:14 GMT
From: mgjv@tradingpost.com.au (Martien Verbruggen)
Subject: Re: Need Help
Message-Id: <slrn9q2hr2.n8d.mgjv@verbruggen.comdyn.com.au>

On Thu, 13 Sep 2001 08:52:01 -0400,
	Benjamin Goldberg <goldbb2@earthlink.net> wrote:
>> Wee wrote:
> 
>> I am trying to grep the process number the process number of the logs,
>> column 5 <89676060>
> 
> Unless I'm mistaken, that's the file size, not a process number.
> You could simply do:
> 	my $logsize = -s "/usr/local/arts/flowscan.log";

But that is the size, also not a process number. :)

Martien
-- 
Martien Verbruggen              | 
Interactive Media Division      | That's funny, that plane's dustin'
Commercial Dynamics Pty. Ltd.   | crops where there ain't no crops.
NSW, Australia                  | 


------------------------------

Date: Fri, 14 Sep 2001 00:15:58 +0000 (UTC)
From: efflandt@xnet.com (David Efflandt)
Subject: Re: Novice:-How do i cleanUp of privious entries if form is submitted to itself
Message-Id: <slrn9q2j1u.d30.efflandt@typhoon.xnet.com>

On Thu, 13 Sep 2001 19:33:59 +0530, Anupam <anpandey@cisco.com> wrote:
> there is a cgi in perl
> i am submitting a form to itself.
> 
> Problem is that on refresh in Browser privious entries do not go ..
> How do i clean it up ?? so that on every refresh from browser , form should
> get empty

perldoc CGI

       CREATING A DEFAULT BUTTON

          print $query->defaults('button_label')

       defaults() creates a button that, when invoked, will cause
       the form to be completely reset to its defaults, wiping
       out all the changes the user ever made.

-- 
David Efflandt - All spam is ignored - http://www.de-srv.com/
http://www.autox.chicago.il.us/  http://www.berniesfloral.net/
http://cgi-help.virtualave.net/  http://hammer.prohosting.com/~cgi-wiz/


------------------------------

Date: 14 Sep 2001 00:05:06 GMT
From: michael.e.grimes.nospam@fritolay.com
Subject: NT Share???
Message-Id: <9nrhji$kh3$1@news.netmar.com>

Howdy,

I have an NT 4.0 FTP Server, and SAMBA has been installed on a UNIX platform
to move incoming files from NT to UNIX. The problem I have is that in order 
to share a drive, I need to establish an NT login session. Although I know 
there is an autologin utility in the NT resource kit that can handle
something
like this, I do not want to leave a login session established on my FTP
server.

Is there any way to setup an NT share in the background - possibly with
Win32::NetResource::AddConnection?

Any help is appreciated.

Thanks,
Mike


 -----  Posted via NewsOne.Net: Free (anonymous) Usenet News via the Web  -----
  http://newsone.net/ -- Free reading and anonymous posting to 60,000+ groups
   NewsOne.Net prohibits users from posting spam.  If this or other posts
made through NewsOne.Net violate posting guidelines, email abuse@newsone.net


------------------------------

Date: Fri, 14 Sep 2001 02:28:20 GMT
From: cfedde@fedde.littleton.co.us (Chris Fedde)
Subject: Re: NT Share???
Message-Id: <8Xdo7.392$Owe.263554560@news.frii.net>

In article <9nrhji$kh3$1@news.netmar.com>,
 <michael.e.grimes.nospam@fritolay.com> wrote:
>Howdy,
>
>I have an NT 4.0 FTP Server, and SAMBA has been installed on a UNIX platform
>to move incoming files from NT to UNIX. The problem I have is that in order 
>to share a drive, I need to establish an NT login session.
>

Samba has several command line tools that allow unix side scripting
of transfers between to and from a CIFS server.  I'd be more inclined
to go that route than to do the mount the CIFS and use file operations.
-- 
    This space intentionally left blank


------------------------------

Date: Fri, 14 Sep 2001 00:25:12 GMT
From: "Graham W. Boyes - TOAO.net" <me@REMOVETHIStoao.net>
Subject: Re: Printing in Perl
Message-Id: <I7co7.7885$jY.160983@news1.rdc1.bc.home.com>

> open (PRINTER, ">LPT1:") or die horribly;
ROTFLMAO!!!  Thanks, I needed that!  Usually that's what my scripts do
already though.  :(

> print PRINTER @junk;
> print PRINTER "\x1A";
> close PRINTER;


Okay!  This looks great!  I can't wait to try it at work tomorrow!  :) :) =P
Thankyouthankyouthankyou...

Graham W. Boyes




------------------------------

Date: 13 Sep 2001 20:30:19 -0700
From: jminor@crystal.cirrus.com (James Minor)
Subject: Problems with format (perlform) and carriage returns...
Message-Id: <d68b5964.0109131930.307793ba@posting.google.com>

I saw that someone posted this question about 5 years ago, but there
was no answer (perhaps a personal reply?), so here goes:

I'm trying to use the following snippet of code

***Snip***
$details = "1\n2\n3\n4\n5\n";

$details =~ s/\n/\r/g;

open (REL_NOTES, ">relnotes") or die ("cannot open: $!");
select (REL_NOTES);
&relnotes;
close (REL_NOTES);

sub relnotes {
        $~ = "RELNOTES";
        write;
}

format RELNOTES =

Details 
====================================
~~ ^<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
$details

 .
***/Snip***

What I get is a single line with the number '1' for the variable. 
What I expected is:

1
2
3
4
5

Now, I saw in the documentation that \r is supposed to create a
newline in this situation.  I know that newlines are stripped, and I
need both the format of this number of characters AND some way of
"bleeding through" the carriage returns within the variable that I'm
printing.

Ideas, thoughts, suggestions?  

BTW, if an answer to this already exists somewhere in the newsgroup,
I'd appreciate a pointer to this knowledge :)


------------------------------

Date: Fri, 14 Sep 2001 04:04:27 GMT
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Problems with format (perlform) and carriage returns...
Message-Id: <slrn9q2tfl.i07.tadmc@tadmc26.august.net>

James Minor <jminor@crystal.cirrus.com> wrote:
>I saw that someone posted this question about 5 years ago, but there
>was no answer (perhaps a personal reply?), so here goes:
>
>I'm trying to use the following snippet of code
>
>***Snip***
>$details = "1\n2\n3\n4\n5\n";
>
>$details =~ s/\n/\r/g;
>
>open (REL_NOTES, ">relnotes") or die ("cannot open: $!");
>select (REL_NOTES);
>&relnotes;
>close (REL_NOTES);
>
>sub relnotes {
>        $~ = "RELNOTES";
>        write;
>}
>
>format RELNOTES =
>
>Details 
>====================================
>~~ ^<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
>$details
>
>.
>***/Snip***
>
>What I get is a single line with the number '1' for the variable. 


My guess is that is what you _see_, but that is not what you
are getting...


>What I expected is:
>
>1
>2
>3
>4
>5
>
>Now, I saw in the documentation that \r is supposed to create a
>newline in this situation.  


Providing a copy/paste from the documentation would have 
been better than paraphrasing it. Where in the docs are
you speaking of?

"newline" generally means the ASCII "line feed" character.

The ASCII "carriage return" character is a different character.


>I know that newlines are stripped, and I
>need both the format of this number of characters AND some way of
>"bleeding through" the carriage 


Why are you messing with CR line endings? Are you on a Mac?


>returns within the variable that I'm
>printing.
>
>Ideas, thoughts, suggestions?  


Are you looking at the output at the command line? A CR is
_supposed_ to ... well, return the carriage (ie. go to beginning
of line). So the "2" overwrites the "1", the "3" overwrites the "2"...

Redirect the output to a file and look at the file size.


-- 
    Tad McClellan                          SGML consulting
    tadmc@augustmail.com                   Perl programming
    Fort Worth, Texas


------------------------------

Date: Thu, 13 Sep 2001 22:57:10 GMT
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Running perl scripts
Message-Id: <slrn9q2b9s.g9l.tadmc@tadmc26.august.net>

Michael Carman <mjcarman@home.com> wrote:
>katan8472 wrote:

>> Say I just wrote up a perl script, hello.pl. From my unix shell
>> interface, how do I run the script?
                       ^^^

There is some spotty information ('cause it depends on the
operating system, not the programming language) in the
obscurely named:

   perldoc perlrun

:-)


>You can
>do one of three things:
>
>  1) run scripts by passing them to perl:
>     % perl hello.pl
>  2) Specify the path to the script:
>     % ./hello.pl
>  3) Add '.' to your path:
>     % hello.pl


Note that if you do 2 or 3, then you also need a proper "shebang"
line. I'm not sure the OP knows what that is. You need to put:

#!/usr/bin/perl -w

as _the very first line_ in the file. You may have to modify
that if your perl is not installed in /usr/bin.


>> Please flame me if it will make your day any better.


Your feet stink!

Thanks a lot. I feel better now.


-- 
    Tad McClellan                          SGML consulting
    tadmc@augustmail.com                   Perl programming
    Fort Worth, Texas


------------------------------

Date: 13 Sep 2001 23:05:57 GMT
From: ansok@alumni.caltech.edu (Gary E. Ansok)
Subject: Re: Running perl scripts
Message-Id: <9nre4l$fi7@gap.cco.caltech.edu>

In article <3BA125B2.A69695F@home.com>,
Michael Carman  <mjcarman@home.com> wrote:
>katan8472 wrote:
>> 
>> This is a stupid question, I am quite sure.
>
>It's a novice question. It's also a *nix question, not a Perl one. We'll
>let the off-topicness slide this time. :)
>
>> So, I'm in my home directory where the file is saved.
>> I type:
>> %hello.pl
>> I get the responce:
>> hello.pl: Command not found.
>
>That's a response from your shell. It means that the program 'hello.pl'
>was not found in your path. The current directory '.' is usually not in
>your path by default because it's a potential security problem. You can
>do one of three things:

It can also mean that your script starts with a #! line that doesn't
have a valid path to perl.

For example, if your script starts off "#! /usr/local/bin/perl", but
perl is /usr/bin/perl on that system, you may see this message.

Occasionally, this results from a script being moved from Windows to
Unix in such a way that the ^M is not removed from the end of the line.

You can fix this by:

a)  Running your script through "dos2unix", or otherwise removing the ^M chars.
b)  Adding -w to the end of the #! line, if it isn't there already.
c)  Both of the above.

The best answer in this case is c).

-- Gary Ansok


------------------------------

Date: Fri, 14 Sep 2001 00:09:41 GMT
From: garry@ifr.zvolve.net (Garry Williams)
Subject: Re: Running perl scripts
Message-Id: <slrn9q2im4.4ti.garry@zfw.zvolve.net>

On 13 Sep 2001 23:05:57 GMT, Gary E. Ansok <ansok@alumni.caltech.edu> wrote:
> In article <3BA125B2.A69695F@home.com>,
> Michael Carman  <mjcarman@home.com> wrote:
>>katan8472 wrote:
>>
>>> So, I'm in my home directory where the file is saved.
>>> I type:
>>> %hello.pl
>>> I get the responce:
>>> hello.pl: Command not found.
>>
>>That's a response from your shell. It means that the program 'hello.pl'
>>was not found in your path. The current directory '.' is usually not in
>>your path by default because it's a potential security problem. You can
>>do one of three things:
> 
> It can also mean that your script starts with a #! line that doesn't
> have a valid path to perl.
> 
> For example, if your script starts off "#! /usr/local/bin/perl", but
> perl is /usr/bin/perl on that system, you may see this message.

This seems to be a function of what shell you're using: 

    $ cat try.it
    #!/no/such/directory/perl -w
    exit 0;
    $ chmod +x try.it
    $ ./try.it
    zsh: no such file or directory: ./try.it
    $ try.it
    zsh: command not found: try.it
    $ ksh
    $ ./try.it
    ksh: ./try.it:  not found
    $ try.it
    ksh: try.it:  not found
    $ ^D
    $ csh
    % ./try.it
    ./try.it: Command not found
    % try.it
    try.it: Command not found
    $ bash
    $ ./try.it
    bash: ./try.it: No such file or directory
    $ try.it
    bash: try.it: command not found
    $ exit
    $ sh
    $ ./try.it
    ./try.it: not found
    $ try.it
    try.it: not found
    $

It seems that zsh and bash *do* make a distinction between the
interpreter not found (#!) and the command not found.  But my versions
of sh, ksh and csh do not distinguish between these two.  

-- 
Garry Williams


------------------------------

Date: Fri, 14 Sep 2001 03:21:00 GMT
From: ralph@primemail.com (Ralph Freshour)
Subject: Source Code Bracket Matching Utility Needed
Message-Id: <3ba1788c.6708330@news-server>

Bracket matching utility wanted:

Is there a perl utility that will let me check bracket matching in my
script?  I have a large script and I cannot manually find the
mis-matched bracket.

Thanks for any help...

Ralph



------------------------------

Date: Fri, 14 Sep 2001 03:51:30 GMT
From: cfedde@fedde.littleton.co.us (Chris Fedde)
Subject: Re: Source Code Bracket Matching Utility Needed
Message-Id: <69fo7.393$Owe.239247872@news.frii.net>

In article <3ba1788c.6708330@news-server>,
Ralph Freshour <ralph@primemail.com> wrote:
>Bracket matching utility wanted:
>
>Is there a perl utility that will let me check bracket matching in my
>script?  I have a large script and I cannot manually find the
>mis-matched bracket.
>

Normally your editor can help with this.  In VI use the % key in emacs I think
there is a feature that shows a matching bracket.

In perl you can get perltidy from http://sourceforge.net/projects/perltidy/
In addition to formatting your perl source files it will help find many problems
in your code ioncluding mis-matched quotes and unbalanced paren, brackets,
braces.

Good Luck
-- 
    This space intentionally left blank


------------------------------

Date: Fri, 14 Sep 2001 10:43:31 +0800
From: "Dai Yuwen" <yuwen@microtek.com.cn>
Subject: Re: Why the client still waits for input?
Message-Id: <9nrqt5$2022$1@news.cz.js.cn>


Simon Oliver <simon.oliver@umist.ac.uk> wrote in message
news:3ba091ae$1@news.umist.ac.uk...
> Many shells require the ^D to be at the start of a new line - and I seem
to
> remeber that on Win95 you need to use ^Z instead?

But I'm  in Linux. After I pressed ^D, I still couldn't go back to the
command line.

> > Hi, all
> >
> > The following code is from the 'perlipc' manpage.  It's a interactive
> > client.  But when I press '^D' to end the seesion, the client still
waits
> > for input.  Any idea?  Thank in advance.
> >
> > best regards,
> > Dai Yuwen
> >
> > #! /usr/bin/perl -w
> >
> > # interactive client
> >
> > use strict;
> > use IO::Socket;
> >
> > my ($host, $port, $kidpid, $handle, $line);
> >
> > unless (@ARGV >= 2) { die "usage: $0 host port\n";}
> > $host = shift @ARGV;
> > $port = shift @ARGV;
> >
> > # create a tcp connection to the specified host and port
> > $handle = IO::Socket::INET->new (Proto    => "tcp",
> > PeerAddr => $host,
> > PeerPort => $port)
> >     or die "can not connect to port $port on $host: $!";
> >
> > $handle->autoflush (1);
> > print STDERR "[Connected to $host:$port]\n";
> >
> > # split the program into two processes, identical twins
> > die "cann't fork: $!" unless defined ($kidpid = fork ());
> >
> > # the if{} block runs only in the parent process
> > if ($kidpid) {
> >     # copy the socket to standard output
> >     while (defined ($line = <$handle>)) {
> > print STDOUT $line;
> >     }
> >     kill ("TERM", $kidpid);
> > }
> > # the else{} block runs only in the child process
> > else {
> >     # copy standard input to the socket
> >     while ( ($line = <STDIN>)) {
> > print $handle $line;
> >     }
> >
> > }
> >
> >
> >
>
>




------------------------------

Date: 13 Sep 2001 21:00:46 -0700
From: shan_shetty@yahoo.com (shan)
Subject: xml parser
Message-Id: <bc090ff9.0109132000.6289598@posting.google.com>

hello,

I have downloaded the microsoft sdk xml parser version3.0 which is a
japanese version, now i am getting the reason in the get_reason()
function in the jerman language, but i don't want this, i want the
reason in the english language.
please tell me how to do this.

thanking you,

shan


------------------------------

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 1743
***************************************


home help back first fref pref prev next nref lref last post