[12179] in Perl-Users-Digest
Perl-Users Digest, Issue: 5780 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue May 25 18:07:28 1999
Date: Tue, 25 May 99 15:01:29 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Tue, 25 May 1999 Volume: 8 Number: 5780
Today's topics:
Re: Perl "constructors" zenin@bawdycaste.org
Re: Perl "constructors" <garethr@cre.canon.co.uk>
Re: Perl "constructors" <jdporter@min.net>
Re: Perl compiler...If or when <corus@my-dejanews.com>
Re: Perl compiler...If or when <tchrist@mox.perl.com>
Re: Perl5 Script OS Sol2.6: Using cgi-bin/html/sccs <cassell@mail.cor.epa.gov>
perl5.005_03/sunos4.1.4 *dbm.t tests fail <anne@sparky.ic.sunysb.edu>
Re: Please, oo types, help with this! (Re: ooPerl is h (Andrew Allen)
Question regarding semaphores <jhilgedi@indiana.edu>
Re: removings " "s from strings <upsetter@ziplink.net>
Re: removings " "s from strings (Tad McClellan)
Re: removings " "s from strings (Tad McClellan)
Re: Sorting Problem <jdporter@min.net>
Re: Sorting Problem garthwebb@my-dejanews.com
Re: Sorting Problem (Larry Rosler)
Re: Sorting Problem (Randal L. Schwartz)
Webjump Script Problems philipbrown@hotmail.com
Re: XS programming (HELP!) newbie... (Ilya Zakharevich)
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 25 May 1999 20:34:38 GMT
From: zenin@bawdycaste.org
Subject: Re: Perl "constructors"
Message-Id: <927664647.282821@localhost>
Eric The Read <emschwar@rmi.net> wrote:
: John Porter <jdporter@min.net> writes:
:> This is the difference between *catching* an exception and
:> *dealing with* an exception. eval catches everything. dealing with
:> whatever eval caught is up to the programmer.
:
: But eval is supposed to be analogous to "try", isn't it? It makes more
: sense if you look at it as
:
: try {...}
: catch (Exception e) {}
:
: But that's not too helpful for real exception handling.
A bare eval {} case, true. In the Real World, it's fine as you're
free to catch (Exception e) { handler_code(0); } when/if you need
it.
: At least Perl lets you continue to use that Exception object (okay, $@)
: after the try/catch block is over, which most other exception-handling
: languages don't.
That's a feature.
: Yes, I understand that eval/die is not really analogous to try/catch; this
: was kinda my whole point-- that they're okay for approximating exception
: handling, but they're not a substitute for the real thing. They're as
: close as Perl lets you get, though.
They are also no less useful. Infact, they are far more useful.
Perl's model blends the lines between "exceptions" and traditional
error reporting (set a global ala $@ and return false). Perl gives
you the flexibility to move back and forth between these and other
systems nearly transparently, without any loss of functionality for
either paradigm.
:> One of things you might do is re-throw (i.e. propagate), but this
:> does not happen automatically.
:
: Right; because a die isn't really an exception (or eval isn't really try,
: take your pick); it's just a reasonably close first approximation of one.
It's not identical, correct, which is why they aren't spelled
"throw" and "try" respectively. They are however, able to easily
implement the same functionality as well as incorporate other
functionality.
As usual, Perl *enables* the user to implement a paradigm. It bends
over backwards to avoid *forcing* a particular paradigm on the user,
which is why it doesn't force the traditional limitations of
try/throw/catch.
--
-Zenin (zenin@archive.rhps.org) Caffeine...for the mind.
Pizza......for the body.
Sushi......for the soul.
-- User Friendly
------------------------------
Date: Tue, 25 May 1999 21:10:43 GMT
From: Gareth Rees <garethr@cre.canon.co.uk>
Subject: Re: Perl "constructors"
Message-Id: <si1zg4dfe4.fsf@cre.canon.co.uk>
zenin@bawdycaste.org wrote:
> Perl's model blends the lines between "exceptions" and traditional
> error reporting (set a global ala $@ and return false). Perl gives
> you the flexibility to move back and forth between these and other
> systems nearly transparently, without any loss of functionality for
> either paradigm.
Except that some other module that you're using might have installed a
$SIG{__DIE__} handler that messes with your exception object. This is
where the transparency breaks down. The other module's interpretation
of 'die' as 'exit' clashes with your use of 'die' as 'throw'.
--
Gareth Rees
------------------------------
Date: Tue, 25 May 1999 21:05:58 GMT
From: John Porter <jdporter@min.net>
Subject: Re: Perl "constructors"
Message-Id: <7if3bk$fpr$1@nnrp1.deja.com>
In article <xkf4sl1gg94.fsf@valdemar.col.hp.com>,
Eric The Read <emschwar@rmi.net> wrote:
>
> But eval is supposed to be analogous to "try", isn't it?
No, that's not its intent. Its intent is to give you what you,
the perl programmer, need. Other languages' approaches are taken
merely as suggestive, not prescriptive.
> It makes more sense if you look at it as
> try {...} catch (Exception e) {}
More sense to you, maybe.
> Yes, I understand that eval/die is not really analogous to try/catch;
> this was kinda my whole point-- that they're okay for approximating
> exception handling, but they're not a substitute for the real thing.
You are laboring under the delusion that the way other languages
have approximated "real" exception-handling is somehow better.
> Right; because a die isn't really an exception (or eval isn't really
> try, take your pick); it's just a reasonably close first approximation
> of one.
Actually, try isn't really eval, and throw isn't really die;
they're just reasonably close first approximations.
:-)
--
John Porter
Put it on a plate, son. You'll enjoy it more.
--== Sent via Deja.com http://www.deja.com/ ==--
---Share what you know. Learn what you don't.---
------------------------------
Date: Tue, 25 May 1999 21:44:13 GMT
From: Corus <corus@my-dejanews.com>
To: tchrist@mox.perl.com
Subject: Re: Perl compiler...If or when
Message-Id: <7if5jc$hc2$1@nnrp1.deja.com>
> And that's hogwash. Next time, I'll use stronger worlds.
If you're running out of arguments feel free.
> And so science is "communism", too, right? And this is bad? Let's
>just hide all of our scientific research, all our scientific advances,
>all our scientific knowledge. What a fine world that will be!
You can draw your picture anyway it pleases you most.
You can try misquote me and put words into my mouth, the bottom line is
that without competition there is no progress. It's one thing sharing
your scientific findings with others in your domain and it's another
expecting companies to share theirs with their competitors.
You can't invent a formula, apply it to all situations and expect to to
work. Lots of people have tried it in the past but they have failed.
Trust me.
>
> You're using the word "communism" for its connotations, not its
> denotations. That's dirty pool.
On the contrary I'm using the word with one and only one meaning.
The attempt to imply equality of everything and everyone by imposing
even distribution of assets, either material or intellectual ones.
>
> No, of course you don't have to add to the sum of human knowledge,
> whether it be pure science, computing science, or just
> plain programming.
> But no one here is under any obligation to help you, and as you see,
> few are so inclined. If we all played the sickening Game of Greed,
> we'd all be worse off for it. Fortunately, most of us choose not to.
That which you call the sickening Game of Greed is what gave birth to
what you so much love.
Unix wouldn't exist without the greed of AT&T.
Leonardo DaVinci's aeroplane wings had Coca-Cola printed on them.
And here you are today, downcasting Greed and Capitalism at the top of
your voice, tapping away on a keyboard which is the product of that very
Greed. Doing it through a medium that is capitalism in its purest form
(or did you really think that the internet was put together by hackers).
Your words carried across the world by routers running proprietary
software and telecommunication lines whose rich owners look down on you
and laugh, for while you're shouting at the top of your voice
anathematizing them, they know that had it not been for their ideals
yours wouldn't be heard.
regards...
--== Sent via Deja.com http://www.deja.com/ ==--
---Share what you know. Learn what you don't.---
------------------------------
Date: 25 May 1999 15:59:26 -0700
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Perl compiler...If or when
Message-Id: <374b1d3e@cs.colorado.edu>
[courtesy cc of this posting mailed to cited author]
Suffering under Mozilla/4.5 [en] (Win95; I), in comp.lang.perl.misc and
as secret private mail, Corus <corus@my-dejanews.com> writes:
:If you're running out of arguments feel free.
You sent me a stealth CC. That's evil and wrong.
Please figure out how to use your newsreader.
As I said privately, I know evil when I see it.
And I've seen it. Repeatedly. Check your headers
for examples.
--tom
--
"Mediocrity is a hand rail."
- Baron de Montesquieu
------------------------------
Date: Tue, 25 May 1999 14:34:11 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
To: Cindy Landon <clandon@fallschurch.esys.com>
Subject: Re: Perl5 Script OS Sol2.6: Using cgi-bin/html/sccs
Message-Id: <374B1753.4DAFD921@mail.cor.epa.gov>
[courtesy cc sent to poster]
Cindy Landon wrote:
>
> > Hi,
> >
> > I'm writing in hopes that you might have some insight with
>
> > a Perl5 script using sccs and html which we've ported
> from
> > Irix 6.2 OS
> > to Sol2.6.
> >
> >
> >
> > Seem to be having problems with sccs specifically the
> > delget's.
> > I'm not an expert by any means of incorporating html w/
> > Perl5
> > but have used Perl for about 5 years. So, my thoughts are
>
> > that it could be something html wise that i'm missing or
> > sccs from irix and sol2.6.
> >
> > Here is a sample of my code any thoughts would be
> > appreciated!
> > Aplogize if i sent TO much of the code. Just let me know.
Okay, apology accepted. But you really sent way, way too
much code for me to scan through with any sort of reliability.
And everyone in this ng knows I'm unreliable under the
best of circumstances. :-) But let me make a few comments
here and there, and elide the rest of your code:
> [snip]
> $thisday = (Sun,Mon,Tue,Wed,Thu,Fri,Sat) [(localtime)[6]];
> $Month =
> (Jan,Feb,Mar,Apr,May,June,July,Aug,Sept,Oct,Nov,Dec)
> [(localtime)[4]];
> $Day = (localtime)[3];
> $Year = (localtime)[5];
> $Hour = (localtime)[2];
> $Minute = (localtime)[1];
I would have done this as one call to localtime(), loading
everything into a list of $vars, and then create $thisday
and $Month. I would have done as you did on those two scalars,
but I would very definitely have made this change:
$Year += 1900;
because (localtime)[5] returns not a year, but the offset in
years from 1900 . So your code below will break in a matter
of months:
> if ($in{'new_status'} eq $in{'old_status'}) {
> $result=`cd $directory; /usr/bin/sccs edit $file`;
> print "Retrieving original file: ",$result,"\n<BR>";
> open(APPEND_FILE,">>$file");
> print APPEND_FILE "Name: ",$in{'name'},"\t";
> print APPEND_FILE $Month," ",$Day,", 19",$Year,"
^^^^^^^^^
Uh-oh. You'll want to fix that before January.
> ",$Hour,":",$Minute,"\n";
> print APPEND_FILE "\n";
> print APPEND_FILE $in{'comment'},"\n";
> print APPEND_FILE
> "--------------------------------------------------\n";
> close APPEND_FILE;
> $result=`cd $directory; /usr/bin/sccs delget $file -yNO`;
> print "Version: ",$result,"\n";
I take it from your comments that this is no longer working
right. You ought to check the returned status value.
print "Gack! qx// failed horribly! $? \n" if ($?);
or die() or warn() or whatever is appropriate for your program.
This may tell you what went wrong. I can tell you this:
sccs is not in /usr/bin on my Slowlaris box. It's in
/usr/ccs/bin . And you can give that -y option a null
comment too.
> [lots more code snipped]
> # print <<PrintFormEnd4;
> print "<FORM method=\"POST\" ACTION=\"";
> print $http_process;
> print "\">";
> print "<P>";
>
> print "Title:\n";
> print "<INPUT TYPE=TEXT NAME=\"title\" MAXLENGTH=65
> SIZE=65 VALUE=\"";
> [more snippage]
It's odd that you abandoned the here-doc form in favor
of a slew of print()s. But if you really want that, you
ought to switch to the qq// form of the double-quote, so
you don't have to backslash every " in sight in your HTML.
It will make things easier on the eye as well.
> [lots more code snipped]
That's all I have time for. Hope it helped.
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: 25 May 1999 16:20:51 -0500
From: Anne Kilarjian <anne@sparky.ic.sunysb.edu>
Subject: perl5.005_03/sunos4.1.4 *dbm.t tests fail
Message-Id: <374b0623.0@news.ic.sunysb.edu>
I have just compiled up perl5.005_03 under sunos 4.1.4 using gcc 2.6.3.
Everything seemed OK except that the 4 lib/*dbm tests all failed as
detailed below.
lib/anydbm..........ld.so: call to undefined procedure _dbm_open from
0xf7762154
lib/gdbm............ld.so: Undefined symbol: ___builtin_alloca
lib/ndbm............ld.so: call to undefined procedure _dbm_open from
0xf7762154
lib/odbm............ld.so: call to undefined procedure _creat from 0xf7766198
The system has gdbm installed and the perl config seemed to find it and add
the /usr/local path it needed. It also has the libdbm.a, dbm.h and ndbm.h
which are part of the OS. Can anyone tell me why these tests failed and
what I can do about it?
Thanks in advance
Anne Kilarjian
------------------------------
Date: 25 May 1999 21:41:09 GMT
From: ada@fc.hp.com (Andrew Allen)
Subject: Re: Please, oo types, help with this! (Re: ooPerl is harder than it looks)
Message-Id: <7if5dl$4k8$1@fcnews.fc.hp.com>
digital kensai (kensai@nortel.com) wrote:
: Well, I've got my class working now. I'd like to get some help planning
: what I need my class to do.
: Right now, I've a structure kind of like this; a board, floating in space,
: with a set of pieces, floating in space, with a set of piece references,
: again, off in la-la land.
Okay, I'll bite. I saw your last post, and was going to make some
comments, but got bogged down:
You've got a fundamental problem here: you've got two "types" (a
board, and pieces) that you're trying to implement with one "class"
(or package). That's why your constructor looks like two constructors.
It's also prevents you from having more than one "board" at a time.
I think you're also fighting with the problem of implementation of
your "board". It's a two-dimensional array. So use a two-dimensional
array. I wouldn't bother with storing the board size. You can always
get that from the array, if you need to.
Here's what I'd do (untested code):
package SBoard;
sub new {
my($class,$rows,$cols)=@_;
bless map([(undef)x$cols],1..$rows),$class;
}
sub newpiece {
my($self,$row,$col,$num)=@_;
my $cols=@{$self->[0]};
$self->[$row][$col]=new Piece ($self,$row,$col,$num,int($num/$cols),$num%$cols);
}
sub pieceat {
my($self,$row,$col,$piece)=@_;
$self->[$row][$col]=$piece if @_==4;
return $self->[$row][$col];
}
package Piece;
sub new
{
my($class,$board,$row,$col,$num,$irow,$icol)=@_;
bless +{"board" => $board,
"row" => $row,
"col" => $col,
"irow" => $irow,
"icol" => $icol},$class;
}
# accessor functions ad nauseum...
sub move
{
my($self,$nrow,$ncol)=@_;
my($board,$row,$col)=@{$self}{qw(board row col)};
# we probably should do something with the piece at the new position...
$board->pieceat($row,$col,undef);
$board->pieceat($nrow,$ncol,$self);
}
Of course, the more I do here, the more silly a "Piece" class seeems.
I mean, all it really is is a piece number and ideal position. We
could easily just stuff the numbers into the board array and keep a
lookup table of piecenum->ideal positions, yes?
Andrew
------------------------------
Date: Tue, 25 May 1999 15:15:42 -0500
From: "John Hilgedick" <jhilgedi@indiana.edu>
Subject: Question regarding semaphores
Message-Id: <7ievua$v1$1@jetsam.uits.indiana.edu>
I'd like to use semaphores in my cgi scripts. I've looked at the semaphore
module (which works on servers under System V - but not others) and am
looking for something more flexible.
I have 2 questions in this area:
1. Does anyone know of an existing semaphore module that works on "most"
servers?
2. Is there any reason why I can't implement semaphores myself using
"flock"?
Any light you can shed would be appreciated.
-john
------------------------------
Date: Tue, 25 May 1999 20:24:23 GMT
From: Scratchie <upsetter@ziplink.net>
Subject: Re: removings " "s from strings
Message-Id: <XFD23.634$nn.176473@news.shore.net>
Tad McClellan <tadmc@metronet.com> wrote:
: If you must go the slower route, then you can access the FAQs at:
^^^^^^
: http://language.perl.com/faq/index.html
I think you mis-spelled "more convenient, hyper-linked". :)
--Art
--
--------------------------------------------------------------------------
National Ska & Reggae Calendar
http://www.agitators.com/calendar/
--------------------------------------------------------------------------
------------------------------
Date: Tue, 25 May 1999 11:05:07 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: removings " "s from strings
Message-Id: <37eei7.slk.ln@magna.metronet.com>
Daniel Vesma (daniel.vesma@thewebtree.com) wrote:
: >Then you don't have Perl. Please install Perl and consult
: >its documentation.
: Yes I do. Running under win98.
You don't seem to have gotten it.
The FAQs *come with* the perl distribution.
If you do not have them, then you have a bootleg or other
nefarious version of perl. Which is not perl.
Uninstall it and get a real perl.
Where did you get your perl from?
Maybe the docs *are* there, but you just can't find them.
Tell us your setup and maybe we can tell you where they
are. ( they are often HTML files with Win32 distributions...)
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Tue, 25 May 1999 12:02:42 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: removings " "s from strings
Message-Id: <2jhei7.5pk.ln@magna.metronet.com>
Scratchie (upsetter@ziplink.net) wrote:
: Tad McClellan <tadmc@metronet.com> wrote:
: : If you must go the slower route, then you can access the FAQs at:
: ^^^^^^
: : http://language.perl.com/faq/index.html
: I think you mis-spelled "more convenient, hyper-linked". :)
No, I meant the slower route.
And I'm not talking about access time.
I'm talking about how long it takes to find info relevant
to the question at hand.
eg.
Find all occurrences of "lookahead" in the Perl docs.
Takes about 15 seconds to grep a bunch of files on the hard disk.
Takes a couple of hours to load in ~50 .pod files and do an
Edit->Find in Page
:-)
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Tue, 25 May 1999 20:05:30 GMT
From: John Porter <jdporter@min.net>
Subject: Re: Sorting Problem
Message-Id: <7ievq7$cti$1@nnrp1.deja.com>
In article <374AEA7B.11CAF702@rlaj.com>,
Ranson <ranson@rlaj.com> wrote:
>
> I know this is a fundemental problem, and I should know this, but cant
> find a solution.
Did you RTFM? Bet not...
> Does anyone know how to do this? I
> have all the books and if it is in there I cant find it.
Smells like homework.
A Schwartzian Transform:
print
map { $_->[0] }
sort { $a->[1]<=> $b->[1] }
map { /(\d+)/; [ $_, $1 ] }
<>;
--
John Porter
Put it on a plate, son. You'll enjoy it more.
--== Sent via Deja.com http://www.deja.com/ ==--
---Share what you know. Learn what you don't.---
------------------------------
Date: Tue, 25 May 1999 20:31:07 GMT
From: garthwebb@my-dejanews.com
Subject: Re: Sorting Problem
Message-Id: <7if1ac$e0r$1@nnrp1.deja.com>
> I need to sort 1-2-3-4-5 and so on. Does anyone know how to do
this? I
> have all the books and if it is in there I cant find it. If someone
# Assume: @a = ('page1.gif', 'page2.gif', ...);
@sorted = sort { ($a=~/(\d+)/)[0] <=> ($b=~/(\d+)/)[0] } @a;
Garth
--== Sent via Deja.com http://www.deja.com/ ==--
---Share what you know. Learn what you don't.---
------------------------------
Date: Tue, 25 May 1999 13:33:43 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Sorting Problem
Message-Id: <MPG.11b4a8fde73aa346989af2@nntp.hpl.hp.com>
[Posted and a courtesy copy mailed.]
In article <374AEA7B.11CAF702@rlaj.com> on Tue, 25 May 1999 13:22:51 -
0500, Ranson <ranson@rlaj.com> says...
> I know this is a fundemental problem, and I should know this, but cant
> find a solution.
Yes, it is, and you haven't been looking in the right places.
> I need to sort 1-2-3-4-5 and so on. Does anyone know how to do this? I
> have all the books and if it is in there I cant find it.
It is about half-way down the sort() man page in the standard Perl
distribution.
perldoc -f sort
If you really have 'all the books', look in The Perl Cookbook, Recipe
4.15 (Sorting a List by Computable Field). If you don't have that book,
throw away the others (except 'Programming Perl' and one or two others
that don't include 'for Dummies' or 'in 21 Days' in their titles), and
buy it.
You might also read "Far More Than Everything You've Ever Wanted to Know
About Sorting", which you can find at <URL:http://www.perl.com/>.
> If someone has
> a solution please post and email rlaj@rlaj.com -- thanks so much in
> advance
You're welcome.
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 25 May 1999 14:54:53 -0700
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: Sorting Problem
Message-Id: <m1r9o4u85u.fsf@halfdome.holdit.com>
>>>>> "John" == John Porter <jdporter@min.net> writes:
John> map { /(\d+)/; [ $_, $1 ] }
Bad. never use $1 unless you checked the result of the match
that you thought set it. Otherwise, you get a previous (or outer)
$1. bad.
--
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@teleport.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me
------------------------------
Date: Tue, 25 May 1999 19:56:31 GMT
From: philipbrown@hotmail.com
Subject: Webjump Script Problems
Message-Id: <7iev9e$cdo$1@nnrp1.deja.com>
I was trying to run a Perl script (.pl) on Webjump, but the server
sent me a message saying that something was wrong with the script. I
tried running it as CGIRealm and it ran without any problems. The
script was written for Perl 2.003 or better and Webjump has Perl 2.005.
I am pretty sure that the configuration file is correct. Does anyone
have any idea what might be the problem?
--
The Truth is Out There (X-Files).
--== Sent via Deja.com http://www.deja.com/ ==--
---Share what you know. Learn what you don't.---
------------------------------
Date: 25 May 1999 20:53:07 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: XS programming (HELP!) newbie...
Message-Id: <7if2jj$ie9$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to D. Emilio Grimaldo Tunon
<emilio_tunon@nl.compuware.com>],
who wrote in article <374AA7AB.D1A9F574@nl.compuware.com>:
> > I am just beginning to get into Perl Extension programming (XS),
> > have read the various manual pages and have gotten something basic
> > working but I have the following questions:
> >
> > 1. The perlxstut man page says that during 'make install' it is
> > installed in the Perl's system directory (/usr/lib/perl5/...)
> > but what about being able to install it in 'user space'? say
> > $HOME/perllib/ ? is that possible? I would hope so, that way
> > one can try these binary modules before actually installing
> > them on the system (among other applications...)
This has nothing to do with XS. Build/Installation is done by
MakeMaker (which docs please see).
> > 2. I have a Perl function that I invoke like:
> >
> > &SetRequest(\$var1, \@array, \%hash);
> >
> > but I haven't figured out how to get the thing to either
> > let var1 be known to the caller or get elements (in the XS)
> > from the array. The array has strings.
This has nothing to do with XS. This is the question of accessing
Perl guts (which docs please see). "Perl guts Illustrated" (by GAAS)
may be also very helpful.
Ilya
------------------------------
Date: 12 Dec 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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.misc (and this Digest), send your
article to perl-users@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.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
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 V8 Issue 5780
**************************************
