[24773] in Perl-Users-Digest
Perl-Users Digest, Issue: 6926 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Aug 28 21:06:13 2004
Date: Sat, 28 Aug 2004 18: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)
Perl-Users Digest Sat, 28 Aug 2004 Volume: 10 Number: 6926
Today's topics:
Re: Execute Windows program from Perl script (??) <nobull@mail.com>
Re: Execute Windows program from Perl script (??) (Tony McGuire)
Re: Execute Windows program from Perl script (??) (Tony McGuire)
Re: Execute Windows program from Perl script (??) <postmaster@castleamber.com>
Re: Execute Windows program from Perl script (??) <postmaster@castleamber.com>
Re: Execute Windows program from Perl script (??) <Joe.Smith@inwap.com>
Re: Execute Windows program from Perl script (??) <zebee@zip.com.au>
Re: Execute Windows program from Perl script (??) (Anno Siegel)
Re: Execute Windows program from Perl script (??) <postmaster@castleamber.com>
HELP about File::DirSync <luke@program.com.tw>
Re: how many days ago is 2003-07-20 ? (Anno Siegel)
Re: how many days ago is 2003-07-20 ? <noreply@gunnar.cc>
Re: How to find out if a string is in uppercase only <jurgenex@hotmail.com>
Re: hv_iterinit has side effects - who cares about PL t <Joe.Smith@inwap.com>
Re: Joining 2 strings <Joe.Smith@inwap.com>
Need Help for Form validation - Javascript & CGI <biz-cat@netvigator.com>
Re: pass 2d array to C function (Anno Siegel)
Re: Resizing JPG images with Perl? <nospam@thanksanyway.org>
Re: testing without shell access <Joe.Smith@inwap.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 28 Aug 2004 19:16:54 +0100
From: Brian McCauley <nobull@mail.com>
Subject: Re: Execute Windows program from Perl script (??)
Message-Id: <cgqi6n$a83$1@slavica.ukpost.com>
Tony McGuire wrote:
> tony@paradoxcommunity.com (Tony McGuire)
>
>
>>system( "start", "C:\Program Files\TextPad 4\TextPad.exe");
>>
>>There is no error. The web page I post from just sits there as if the perl
>>were executing. And when I check the 'server' box I find a cmd.exe in Task
>>Mangler, one for each time I run the script.
>>
>>And the only way to remove the 'hidden' copy of cmd.exe (there's no DOS box
>>up) is to reboot Windows. When I try to end task on them, I get 'Access
>>Denied'.
>
>
> I guess what I am looking for isn't doable from perl.
What in this thread makes you guess that?
> I was looking to start a Windows program independent of the Apache
> umbrella.
Well that is a question about Windows - having worked what succession of
windows API calls was necessary to achive that effect you could then
make those calls from a program written in any lanuage that gives you
access to the low level Windows API. This would include Perl with the
relevant Win32::* modules intalled.
> But I doubt Apache will restart if there is a process running, which
> there would be if perl must wait on anything it starts with system().
There are other windows-specific ways to start processes from a Perl
script as I mentioned earler in this thread.
> Well, back to the drawing board. I guess I'll write to a file (with
> perl), and have a scheduler watch for the file to be changed - then
> kick off that other Windows program using the scheduler.
And there is, of course, no reason why that program can't be written in
Perl. Just like there's no reason why your CGIs can be written in C.
> That way the Windows program is running independently of
> Apache and the perl script.
I think you mean the CGI script. Yes it may be the case that your CGI
script is in Perl but the issues you are facing here would be the same
is you CGI script was written in C, Python, Java, FORTRAN etc.
> I was hoping to coordinate everything with just perl,
There is no reason why you should not.
> but it doesn't seem to be up to this particular task.
What causes you to imagine that?
------------------------------
Date: 28 Aug 2004 11:52:38 -0700
From: tony@paradoxcommunity.com (Tony McGuire)
Subject: Re: Execute Windows program from Perl script (??)
Message-Id: <f896a829.0408281052.12884c7@posting.google.com>
"Jürgen Exner" <jurgenex@hotmail.com> wrote
Tony McGuire wrote:
>> there would be if perl must wait on anything it starts with
system().
>> That is putting the cart before the horse!
>> If you would have bothered to read the documentation for the
functions you
>> are using you would have noticed:
>> system LIST
>> system PROGRAM LIST
>> Does exactly the same thing as "exec LIST", except that
a fork
>> is done first, and the parent process waits for the
child
>> process to complete. [...]
>>
>> In other words: waiting for the called program to terminate is not
a
>> limitation but a designed and wanted feature of system(). How else
would you
>> return the return value of the called program anyway?
>> If you want a different behaviour then use a different function.
>>
>> Complaining that the multiplication operator doesn't substract is
kind of
>> beside the point.
>> Jue
What you guys don't seem to understand is that there some of out here
that don't have the *slightest* idea what the terms for a function
even are.
So how can we even search for them?
And therefore, how do we know we are using, or asking how to use, the
wrong function?
I've tried to explain what I am trying to do.
What I keep getting is correction of capitalization, correction of use
of terms, explanation of why what I am saying makes no sense when
approached from a technical standpoint, and finally a "don't do that
cause it won't work" with not even a pointer to what *might* work.
You expect us to understand ALL terminology. As far as I am concerned
a fork is something you eat with. I read several descriptions of the
perl meaning, but all they do is point to more gobledygook.
Too bad everyone in the perl world is taking their cues from the Linux
world.
An actual example of this stuff would go a loooong way to making it so
us idiots didn't need to bother the NG clic so much.
------------------------------
Date: 28 Aug 2004 11:59:46 -0700
From: tony@paradoxcommunity.com (Tony McGuire)
Subject: Re: Execute Windows program from Perl script (??)
Message-Id: <f896a829.0408281059.67bd9642@posting.google.com>
"Jürgen Exner" <jurgenex@hotmail.com>
> This part is, well, at least ambiguous. Web pages are HTML, they don't
> "execute" other programs.
> Maybe you are talking about DHTML, maybe you are talking about ActiveX
> controls, maybe you are talking about ASP, maybe you are talking about CGI
> scripts?
No, I am talking about a simple web page <form> that directly posts to
the .pl file.
<FORM action='/cgi-bin/execprog.pl' method='POST'>
So, maybe what I actually have is a cgi script with a .pl extension,
with perl statements in it.
I have no idea.
But see, that's why I came to this group. I was hoping to find some
kind sole who could help me to understand why what I was trying wasn't
working, and maybe point me to the right solution - regardless of how
well I spoke their version of geek.
------------------------------
Date: 28 Aug 2004 19:06:38 GMT
From: John Bokma <postmaster@castleamber.com>
Subject: Re: Execute Windows program from Perl script (??)
Message-Id: <Xns95538F8A26231castleamber@130.133.1.4>
"Jürgen Exner" <jurgenex@hotmail.com> wrote in
news:dL3Yc.290$Gr2.27@trnddc07:
> Complaining that the multiplication operator doesn't substract is kind
> of beside the point.
but.. but.. it does, look:
perl -e "print 100 * 0.5";
--
John MexIT: http://johnbokma.com/mexit/
personal page: http://johnbokma.com/
Experienced programmer available: http://castleamber.com/
Happy Customers: http://castleamber.com/testimonials.html
------------------------------
Date: 28 Aug 2004 19:08:26 GMT
From: John Bokma <postmaster@castleamber.com>
Subject: Re: Execute Windows program from Perl script (??)
Message-Id: <Xns95538FD8745CAcastleamber@130.133.1.4>
tony@paradoxcommunity.com (Tony McGuire) wrote in
news:f896a829.0408281052.12884c7@posting.google.com:
> What you guys don't seem to understand is that there some of out here
> that don't have the *slightest* idea what the terms for a function
> even are.
>
> So how can we even search for them?
Read a book, really. I read through all Perl core functions, and now and
then do it again.
--
John MexIT: http://johnbokma.com/mexit/
personal page: http://johnbokma.com/
Experienced programmer available: http://castleamber.com/
Happy Customers: http://castleamber.com/testimonials.html
------------------------------
Date: Sat, 28 Aug 2004 20:32:16 GMT
From: Joe Smith <Joe.Smith@inwap.com>
Subject: Re: Execute Windows program from Perl script (??)
Message-Id: <kZ5Yc.107681$TI1.2297@attbi_s52>
Tony McGuire wrote:
> I was hoping to coordinate everything with just perl, but it doesn't
> seem to be up to this particular task.
Perl is up to the task.
Doing it via web request is the problem.
Programs invoked via a web server tend do so using the same credentials
as the webserver, not as the owner of the machine. The account that the
web service uses is not an administrator. That's one of the reasons
why a given program works when run from the command line and not from
the web service.
-Joe
------------------------------
Date: Sat, 28 Aug 2004 21:03:06 GMT
From: Zebee Johnstone <zebee@zip.com.au>
Subject: Re: Execute Windows program from Perl script (??)
Message-Id: <slrncj1sdn.pqp.zebee@zeus.zipworld.com.au>
In comp.lang.perl.misc on 28 Aug 2004 11:52:38 -0700
Tony McGuire <tony@paradoxcommunity.com> wrote:
>
> I've tried to explain what I am trying to do.
YUp, and you are getting a rather nasty education in how to do that
explanation...
Start again. THis time, explain what the problem is you are trying to
solve, and include all the detail you can.
You know what you want to do, but you don't know what bits are important
and what bits aren't. You don't know what things you are doing have an
effect. You didn't, for example, realise that doing it from a web page
might be important, so you didn't mention it. THere might be other
things that are important, but you don't know what they are, and they
might seem unimportant to you. But they might make all the difference
to the answers you get.
So, start with a description of the problem you are trying to solve.
NOt the perl one, the people one. When you sit down at the computer,
what do you want to do? What's the final outcome? For example, is it
that you want to be able to edit a file on the webserver?
Lets assume that's it, that you want to fire up notepad on a windows
server and edit a file that lives on that server. So your question
would be something like:
I have a Windows XP machine running IIS 5.0. There are files
on a website on that machine that I want to edit using something
like notepad.
What I want to happen is I open a webpage, push a button on the
page, and up pops a textpad with the file in it to edit.
So I started by having a perl script that has
<insert full script here, not just the line you are having
truble with, and be sure it includes use strict and use warnings>
in it, and calling that with http://my.server/perlscript.pl but
nothing appears on the page, and I get a lot of cmd processes
on the server box which I can't kill.
I think the problem is the open statement with the spaces.
YOu will probably get a bunch of people calling you an idiot for trying
to do what you are doing, welcome to usenet. You will also probably get
someone pointing you to a book or tutorial, someone suggesting you use a
textarea in the web page, someone explaining what's going on, someone
correcting your code showing why it didn't work, and so on. And in all
that, you will almost certainly get enough hints - no matter how badly
expressed - that you can go what you want to do.
Remember that people here are helping you out of the goodness of their
hearts. They owe you *nothing*. You hope like hell they've had a good
day and are willing to spend their own time and effort on a total
stranger who, 90% of the time, won't even say thanks. You can increase
your chances of someone having that good day by giving them the
information they need to work with. Which is a coherent description of
the big problem you are trying to solve as well as the small code one
that you are focused on right now. And do it in a way that someone who
knows nothing at all about your particular circumstances can understand
what's going on.
Oh, you will also get brownie points for asking what tutorials or
documentation deals with what you are trying to do. Because there
probably is at least one, and it might save a lot of heartache to read
it.
In your case, you might want to hop over to http://learn.perl.org/ and
check out the online library, there are books there that will help a lot
with terminology and especially how web and programs and such fit
together, which might help you a lot.
Zebee
------------------------------
Date: 28 Aug 2004 21:34:47 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: Execute Windows program from Perl script (??)
Message-Id: <cgqtpn$gig$3@mamenchi.zrz.TU-Berlin.DE>
John Bokma <postmaster@castleamber.com> wrote in comp.lang.perl.misc:
> "Jürgen Exner" <jurgenex@hotmail.com> wrote in
> news:dL3Yc.290$Gr2.27@trnddc07:
>
> > Complaining that the multiplication operator doesn't substract is kind
> > of beside the point.
>
> but.. but.. it does, look:
>
> perl -e "print 100 * 0.5";
That diminishes, but doesn't subtract: 100 * 0.5 isn't 100 - 0.5. Make
that 100 * 100/101, which is 100 - 100/101.
Anno
------------------------------
Date: 28 Aug 2004 23:55:57 GMT
From: John Bokma <postmaster@castleamber.com>
Subject: Re: Execute Windows program from Perl script (??)
Message-Id: <Xns9553C0970A01Bcastleamber@130.133.1.4>
anno4000@lublin.zrz.tu-berlin.de (Anno Siegel) wrote in news:cgqtpn$gig$3
@mamenchi.zrz.TU-Berlin.DE:
> John Bokma <postmaster@castleamber.com> wrote in comp.lang.perl.misc:
>> "Jürgen Exner" <jurgenex@hotmail.com> wrote in
>> news:dL3Yc.290$Gr2.27@trnddc07:
>>
>> > Complaining that the multiplication operator doesn't substract is kind
>> > of beside the point.
>>
>> but.. but.. it does, look:
>>
>> perl -e "print 100 * 0.5";
>
> That diminishes, but doesn't subtract: 100 * 0.5
It substracts 50 here :-D.
--
John MexIT: http://johnbokma.com/mexit/
personal page: http://johnbokma.com/
Experienced programmer available: http://castleamber.com/
Happy Customers: http://castleamber.com/testimonials.html
------------------------------
Date: Sun, 29 Aug 2004 04:00:32 +0800
From: "news.hinet.net" <luke@program.com.tw>
Subject: HELP about File::DirSync
Message-Id: <cgqo94$hq$1@netnews.hinet.net>
The document say that "Support for FTP dirsync".
But how to do this function with Net::FTP?
------------------------------
Date: 28 Aug 2004 21:08:55 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: how many days ago is 2003-07-20 ?
Message-Id: <cgqs97$gig$2@mamenchi.zrz.TU-Berlin.DE>
Gunnar Hjalmarsson <noreply@gunnar.cc> wrote in comp.lang.perl.misc:
> Marcus wrote:
> > Can someone pls show the most solid way in perl to retrieve the
> > number of days ago a specific date string was?
> >
> > Input: 2003-07-20
> > Output: 395
>
> What have you tried? Personally I'd probably use Time::Local, which
> would require a couple of extra lines of code, while others would use
> e.g. Date::Calc.
Do you have a simple, water-tight solution using only Time::Local?
Note that in the presence of DST a day may have more or less than 24
hours.
Anno
------------------------------
Date: Sat, 28 Aug 2004 23:43:47 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: how many days ago is 2003-07-20 ?
Message-Id: <2pcclbFj9gkjU1@uni-berlin.de>
Anno Siegel wrote:
> Gunnar Hjalmarsson wrote:
>> Marcus wrote:
>>> Can someone pls show the most solid way in perl to retrieve the
>>> number of days ago a specific date string was?
>>>
>>> Input: 2003-07-20 Output: 395
>>
>> What have you tried? Personally I'd probably use Time::Local,
>> which would require a couple of extra lines of code, while others
>> would use e.g. Date::Calc.
>
> Do you have a simple, water-tight solution using only Time::Local?
Think so.
sub daysago {
shift =~ /^(\d{4})-(\d{2})-(\d{2})$/
or die "Invalid date format";
require Time::Local;
import Time::Local 'timelocal';
my $diff = timelocal(0,0,0,(localtime $^T)[3..5])
- timelocal(0,0,0,$3,$2-1,$1-1900);
$diff >= 0 or die "Future date not allowed";
sprintf '%.0f', $diff / 86400
}
print daysago('2003-07-20'), "\n";
> Note that in the presence of DST a day may have more or less than
> 24 hours.
Doesn't the above sub take care of that?
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: Sat, 28 Aug 2004 18:10:16 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: How to find out if a string is in uppercase only
Message-Id: <cU3Yc.293$Gr2.123@trnddc07>
Alan J. Flavell wrote:
> However, the original question seemed to be based on the premise that
> a white space character was upper-case, whereas from Unicode's point
> of view it's not. And at least one of the answers was based on the
> assumption that all characters which didn't exist in a lower-case
> version were defined to be upper-case, which again isn't Unicode's
> view of the world.
Climbing out on a limb here, but there is a chance that the OP actually
wanted to exclude lowercase characters rather then limit the string to upper
case only (although that's what he wrote).
> The Original Poster will need to take a decision
> on this issue.
Yep, quite true.
jue
------------------------------
Date: Sat, 28 Aug 2004 20:58:52 GMT
From: Joe Smith <Joe.Smith@inwap.com>
Subject: Re: hv_iterinit has side effects - who cares about PL theory
Message-Id: <cm6Yc.62095$9d6.38556@attbi_s54>
Ozgun Erdogan wrote:
> As a newbie to Perl programming, I've realized that hv_iterinit has
> side effects.
Correct. Don't mess with the iterator or it will cause bad effects.
> there is no way you can walk over it without changing the internal
> values of the hash itself.
Of course you can. If you gather up all the keys before looking at
the hash values, there is no problem. If you use the each() function,
you must not start another each() on the same hash while still inside
the first one.
Here's an example of how to shoot yourself in the foot:
while(($key,$val) = each %ENV) {
print "$key = $val\n";
if ($key eq "PATH") {
print "Attempting to screw up the each() function\n";
while(($key2,$val2) = each %ENV) {
$count++;
}
print "count=$count\nDone mucking around with each() inside of each()\n";
}
}
It goes into an infinite loop because an improper call to each(%HASH)
while in the middle of an each(%HASH).
> So, if you want to read the values in a hash, there is no way for you
> to do it without modifying other values in the hash itself.
I don't believe you. Show us some real code, and I bet that we can
show you how it can be done correctly. Perl programmers read the
values of a hash all the time without modifying other values in the hash.
> this is some what equivalent to:
>
> $x = 4;
> Print $x;
> (now $x is 10).
Yes, that is expected behavior if Print() is explicitly defined to
alter its arguments. Like this:
sub Print(\$) {
my $sref = shift;
print "Subroutine Print() called with $sref => $$sref\n";
$$sref = 10;
}
$x = 4;
Print $x;
print "Afterwards, \$x is $x\n";
> Take CPAN module Data::Structure::Util, which detects circular
> references, but goes into infinite recursion
That is a problem with one particular module, not a problem with
the Perl language.
-Joe
------------------------------
Date: Sat, 28 Aug 2004 21:11:08 GMT
From: Joe Smith <Joe.Smith@inwap.com>
Subject: Re: Joining 2 strings
Message-Id: <Mx6Yc.77400$Fg5.40640@attbi_s53>
Sim wrote:
> s/^\s*((.*\S)?)\s*$/$1/; #removes spaces before and after the string
That takes longer to execute than doing it in two steps.
s/^\s+//;
s/\s+$//;
See
perldoc -q "blank space"
for more info.
-Joe
------------------------------
Date: Wed, 25 Aug 2004 16:14:09 +0800
From: Bizcat <biz-cat@netvigator.com>
Subject: Need Help for Form validation - Javascript & CGI
Message-Id: <BD526B51.43E%biz-cat@netvigator.com>
> This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
--B_3176295249_1373888
Content-type: text/plain; charset="US-ASCII"
Content-transfer-encoding: 7bit
Hi,
I am writing some simple web pages including a Member Registration Form
which involves the use of Javascript for validation.
I have read and downloaded some scripts and pasted into my form but the
script functions didn't work. I am not good enough to analysis the script
contents to figure out the problem.
Attached is my form in html which contains only a few entry field. My
requirements for validations are included in the source.
I need also to create and manage a simple Member ID+password checklist
database and a CGI script to access it.
I know that these are very simple task for experienced programmers.
Please help.
=======================
For email reply, please delete the "hyphen" between biz and cat.
Many thanks.
--B_3176295249_1373888
Content-type: multipart/appledouble; boundary="B_3176293913_1316759"
--B_3176293913_1316759
Content-type: application/applefile; name="registrationvalid.html"
Content-transfer-encoding: base64
Content-disposition: attachment
AAUWBwACAAAAAAAAAAAAAAAAAAAAAAAAAAMAAAAJAAAAPgAAACAAAAADAAAAXgAAABYAAAAC
AAAAdAAAGR5URVhUSnlXcwEA/////wAAAAAAAAAAAAAAAAAAAAAAAHJlZ2lzdHJhdGlvbnZh
bGlkLmh0bWwAAAEAAAAYsAAAF7AAAABuAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALBgCN
AAAAAAAQAAwAEAAAAAwAAAAAAAAAAAABAAsACUMSAAAACwAAAAAAAAAAAAIADAAKAAMAAAAJ
VVZVVVVVAAAABgALAAkABAAAAAkAAAAAAAAAAAAjABAADAAQAAAADAAAAAAAAAAAACQACwAJ
QxIAAAALAAAAAAAAAAAAJQAMAAoAAwAAAAlVVlVVVVUAAAAxABAADAAQAAAADAAAAAAAAAAA
ADIACwAJQxIAAAALAAAAAAAAAAAAMwAMAAoAAwAAAAlVVlVVVVUAAAA6ABAADAAQAQAADCIU
Ya8vUQAAAEsADAAKAAMAAAAJVVZVVVVVAAAAUwAQAAwAEAAAAAwAAAAAAAAAAABVAAwACgAD
AAAACVVWVVVVVQAAAG4ACwAJAAQAAAAJAAAAAAAAAAAAbwAMAAoAAwAAAAlVVlVVVVUAAABx
AAsACQAEAAAACQAAAAAAAAAAAJEADAAKAAMAAAAJVVZVVVVVAAAAkgAQAAwAEAAAAAwAAAAA
AAAAAACTAAwACgADAAAACVVWVVVVVQAAAJsAEAAMABAAAAAMAAAAAAAAAAAAnAALAAlDEgAA
AAsAAAAAAAAAAACdAAwACgADAAAACVVWVVVVVQAAAKQAEAAMABAAAAAMAAAAAAAAAAAApQAL
AAlDEgAAAAsAAAAAAAAAAACmAAwACgADAAAACVVWVVVVVQAAAKwACwAJQxIAAAALAAAAAAAA
AAAArQAMAAoAAwAAAAkAAQABAAEAAACuAAwACgADAAAACVVWVVVVVQAAANYAEAAMABABAAAM
AAAAAAAAAAAA5wAMAAoAAwAAAAlVVlVVVVUAAAEAABAADAAQAAAADAAAAAAAAAAAAQ4ADAAK
AAMAAAAJVVZVVVVVAAABUQAQAAwAEAAAAAwAAAAAAAAAAAFSAAwACgADAAAACVVWVVVVVQAA
AVgACwAJAAQAAAAJAAAAAAAAAAABnAAMAAoAAwAAAAlVVlVVVVUAAAG3AA8ACkNhAAAADAAA
AAAAAAAAAbkAEAAMABAAAAAMAAAAAAAAAAABzAAMAAoAAwAAAAlVVlVVVVUAAAIMABAADAAQ
AAAADAAAAAAAAAAAAiMADAAKAAMAAAAJVVZVVVVVAAACRgAMAAhDYQAAAAlVVlVVVVUAAAJH
AAwACgADAAAACVVWVVVVVQAAAmsACwAJAAQAAAAJAAAAAAAAAAAC9AAMAAoAAwAAAAlVVlVV
VVUAAAL5ABAADAADAAAADAAAAAAAAAAAAvoADAAKAAMAAAAJVVZVVVVVAAAC+wAQAAwAEAAA
AAwAAAAAAAAAAAMEAAwACgADAAAACVVWVVVVVQAAAyMAEAAMABAAAAAMAAAAAAAAAAADJAAM
AAoAAwAAAAlVVlVVVVUAAAM1AA8ACkNhAAAADAAAAAAAAAAAAzYADAAKAAMAAAAJVVZVVVVV
AAADPwAQAAwAEAAAAAwAAAAAAAAAAANAAAwACgADAAAACVVWVVVVVQAAA0gADwAKQ2EAAAAM
AAAAAAAAAAADSQAMAAoAAwAAAAlVVlVVVVUAAANSABAADAAQAAAADAAAAAAAAAAAA1MADAAK
AAMAAAAJVVZVVVVVAAADWwAPAApDYQAAAAwAAAAAAAAAAANeAAwACgADAAAACVVWVVVVVQAA
A2cAEAAMABAAAAAMAAAAAAAAAAADaAAMAAoAAwAAAAlVVlVVVVUAAAN1ABAADAAQAAAADAAA
AAAAAAAAA3YADAAKAAMAAAAJVVZVVVVVAAADfAALAAkABAAAAAkAAAAAAAAAAAOeAAwACgAD
AAAACVVWVVVVVQAAA6MADwAKQ2EAAAAMAAAAAAAAAAADpAAQAAwAEAAAAAwAAAAAAAAAAAOl
AA8ACkNhAAAADAAAAAAAAAAAA6YADAAKAAMAAAAJVVZVVVVVAAADqQAQAAwAEAEAAAwAAAAA
AAAAAAO2AAwACgADAAAACVVWVVVVVQAAA78AEAAMABAAAAAMAAAAAAAAAAADzAAMAAoAAwAA
AAlVVlVVVVUAAAQKAA8ACkNhAAAADAAAAAAAAAAABAsAEAAMABAAAAAMAAAAAAAAAAAEGAAM
AAoAAwAAAAlVVlVVVVUAAARWABAADAAQAAAADAAAAAAAAAAABF0ADAAKAAMAAAAJVVZVVVVV
AAAEnwALAAkABAAAAAkAAAAAAAAAAAUHAAwACgADAAAACVVWVVVVVQAABQwAEAAMABAAAAAM
AAAAAAAAAAAFDQAPAApDYQAAAAwAAAAAAAAAAAUOAAwACgADAAAACVVWVVVVVQAABQ8AEAAM
ABAAAAAMAAAAAAAAAAAFFQAMAAoAAwAAAAlVVlVVVVUAAAVRABAADAAQAAAADAAAAAAAAAAA
BV0ADAAKAAMAAAAJVVZVVVVVAAAFmwAPAApDYQAAAAwAAAAAAAAAAAWcABAADAADAAAADAAA
AAAAAAAABakADAAKAAMAAAAJVVZVVVVVAAAF5AAQAAwAEAAAAAwAAAAAAAAAAAXlAAwACgAD
AAAACVVWVVVVVQAABesACwAJAAQAAAAJAAAAAAAAAAAGTwAMAAoAAwAAAAlVVlVVVVUAAAZU
AA8ACkNhAAAADAAAAAAAAAAABlUADAAKAAMAAAAJAAEAAQABAAAGWgAMAAoAAwAAAAlVVlVV
VVUAAAZeABAADAAQAAAADAAAAAAAAAAABl8ADAAKAAMAAAAJVVZVVVVVAAAGdgAVABAAEAEA
ABAAAAAAAAAAAAaHAAwACgADAAAACVVWVVVVVQAABpsAEAAMABAAAAAMAAAAAAAAAAAGuwAM
AAoAAwAAAAlVVlVVVVUAAAa/ABAADAAQAAAADAAAAAAAAAAAByYADAAKAAMAAAAJVVZVVVVV
AAAHKQAQAAwAEAAAAAwAAAAAAAAAAAcrABAADAADAAAADAAAAAAAAAAABy0ADAAKAAMAAAAJ
VVZVVVVVAAAHMwAQAAwAAwAAAAwAAAAAAAAAAAc/AAwACgADAAAACVVWVVVVVQAAB0IAEAAM
ABAAAAAMAAAAAAAAAAAHQwAMAAoAAwAAAAlVVlVVVVUAAAdHABAADAAQAAAADAAAAAAAAAAA
B0wAEAAMAAMDAAAMAAAAAAAAAAAHWgAMAAoAAwAAAAlVVlVVVVUAAAdmABAADAADAAAADAAA
AAAAAAAAB6YADAAKAAMAAAAJVVZVVVVVAAAHqgAQAAwAAwAAAAwAAAAAAAAAAAfdAAwACgAD
AAAACVVWVVVVVQAAB+EAEAAMAAMAAAAMAAAAAAAAAAAICwAMAAoAAwAAAAlVVlVVVVUAAAgO
ABAADAAQAAAADAAAAAAAAAAACA8ADAAKQxIAAAAMAAAAAAAAAAAIEAAMAAoAAwAAAAlVVlVV
VVUAAAgWABAADAAQAAAADAAAAAAAAAAACEAAEAAMAAMDAAAMAAAAAAAAAAAIQgAMAAoAAwAA
AAlVVlVVVVUAAAhOABAADAAQAAAADAAAAAAAAAAACJAADAAKAAMAAAAJVVZVVVVVAAAIlAAQ
AAwAEAAAAAwAAAAAAAAAAAjiAAwACgADAAAACVVWVVVVVQAACOYAEAAMABAAAAAMAAAAAAAA
AAAJJwAMAAoAAwAAAAlVVlVVVVUAAAkwABAADAAQAAAADAAAAAAAAAAACVkADAAKAAMAAAAJ
VVZVVVVVAAAJYQAQAAwAEAAAAAwAAAAAAAAAAAliAAwACgADAAAACVVWVVVVVQAACWkAEAAM
ABAAAAAMAAAAAAAAAAAJOAAPAApDYQAAAAwAAAAAAAAAAAk+AAwACgADAAAACVVWVVVVVQAA
CUIADwAKQ2EAAAAMAAAAAAAAAAAJQwAQAAwAAwAAAAwAAAAAAAAAAAlbAAwACgADAAAACVVW
VVVVVQAACXEADwAKQ2EAAAAMAAAAAAAAAAAJdQAMAAoAAwAAAAlVVlVVVVUAAAl8AA8ACkNh
AAAADAAAAAAAAAAACZAADAAKAAMAAAAJVVZVVVVVAAAJpgAPAApDYQAAAAwAAAAAAAAAAAmp
AAwACgADAAAACVVWVVVVVQAACbAADAAIQ2EAAAAJVVZVVVVVAAAJsgAPAApDYQAAAAwAAAAA
AAAAAAnCAAwACgADAAAACVVWVVVVVQAACdgADwAKQ2EAAAAMAAAAAAAAAAAJ2wAMAAoAAwAA
AAlVVlVVVVUAAAnmABAADAAQAAAADAAAAAAAAAAACecADwAKQ2EAAAAMAAAAAAAAAAAJ6AAM
AAoAAwAAAAlVVlVVVVUAAAnrAA8ACkNhAAAADAAAAAAAAAAACfkADAAKAAMAAAAJVVZVVVVV
AAAKOQAQAAwAEAAAAAwAAAAAAAAAAAo6AAwACgADAAAACVVWVVVVVQAAClAAEAAMAAMAAAAM
AAAAAAAAAAAKUQAMAAoAAwAAAAlVVlVVVVUAAApcAA8ACkNhAAAADAAAAAAAAAAACl0AEAAM
AAMAAAAMAAAAAAAAAAAKdwAPAApDYQAAAAwAAAAAAAAAAAqKAAwACgADAAAACVVWVVVVVQAA
CqAADwAKQ2EAAAAMAAAAAAAAAAAKpQAMAAoAAwAAAAlVVlVVVVUAAAqsAA8ACkNhAAAADAAA
AAAAAAAACrIADAAKAAMAAAAJVVZVVVVVAAAKtgAPAApDYQAAAAwAAAAAAAAAAAq3ABAADAAD
AAAADAAAAAAAAAAACs8ADAAKAAMAAAAJVVZVVVVVAAAK5QAPAApDYQAAAAwAAAAAAAAAAArp
AAwACgADAAAACVVWVVVVVQAACvAADwAKQ2EAAAAMAAAAAAAAAAALBwAQAAwAAwAAAAwAAAAA
AAAAAAsJAAwACgADAAAACVVWVVVVVQAACx8ADwAKQ2EAAAAMAAAAAAAAAAALIwAMAAoAAwAA
AAlVVlVVVVUAAAsqAAwACENhAAAACVVWVVVVVQAACywADwAKQ2EAAAAMAAAAAAAAAAALPwAM
AAoAAwAAAAlVVlVVVVUAAAtVAA8ACkNhAAAADAAAAAAAAAAAC1kADAAKAAMAAAAJVVZVVVVV
AAALYwAQAAwAEAAAAAwAAAAAAAAAAAtkAA8ACkNhAAAADAAAAAAAAAAAC2UADAAKAAMAAAAJ
AAEAAQABAAALfgAQAAwAEAAAAAwAAAAAAAAAAAuAAAwACgADAAAACVVWVVVVVQAAC6gADAAK
AAMAAAAJAAAzM5mZAAALrgAMAAoAAwAAAAlVVlVVVVUAAAuwAA8ACkNhAAAADAAAAAAAAAAA
C+YADAAKAAMAAAAJVVZVVVVVAAAL+gAQAAwAEAAAAAwAAAAAAAAAAAv8AAwACgADAAAACVVW
VVVVVQAADA8ADwAKQ2EAAAAMAAAAAAAAAAAMGwAQAAwAAwAAAAwAAAAAAAAAAAxyAA8ACkNh
AAAADAAAAAAAAAAADHoAEAAMAAMAAAAMAAAAAAAAAAAMoAAPAApDYQAAAAwAAAAAAAAAAAyo
ABAADAADAAAADAAAAAAAAAAADNAADwAKQ2EAAAAMAAAAAAAAAAAM1QAQAAwAAwAAAAwAAAAA
AAAAAA0YAAwACgADAAAACVVWVVVVVQAADSEAEAAMABAAAAAMAAAAAAAAAAANIwAPAApDYQAA
AAwAAAAAAAAAAA2LAAwACgADAAAACVVWVVVVVQAADY8AEAAMABAAAAAMAAAAAAAAAAANkQAM
AAoAAwAAAAkiFWGvL1EAAA2YABAADAAQAAAADAAAAAAAAAAADZsADAAKAAMAAAAJAAEAAQAB
AAANtAAQAAwAEAAAAAwAAAAAAAAAAA21AAwACgADAAAACVVWVVVVVQAADgQAEAAMABAAAAAM
AAAAAAAAAAAOBQAQAAwH0gAAAAwAAAAAAAAAAA4nAAwACgADAAAACVVWVVVVVQAADjUADAAK
AAMAAAAJAAAzMwAAAAAOOwAMAAoAAwAAAAlVVlVVVVUAAA49AAsACQAEAAAACQAAAAAAAAAA
Dj4ADQAKOrgAAAAKAAAAAAAAAAAOUQAMAAoAAwAAAAlVVlVVVVUAAA5YAAwACkMSAAAADAAA
AAAAAAAADlkADAAKAAMAAAAJVVZVVVVVAAAOYQAQAAwAEAAAAAwAAAAAAAAAAA5iAAwACgAD
AAAACVVWVVVVVQAADmkAEAAMABAAAAAMAAAAAAAAAAAMWgAMAAoAAwAAAAlVVlVVVVUAAAya
ABAADAAQAAAADAAAAAAAAAAADJsADAAKAAMAAAAJVVZVVVVVAAAMsQAQAAwAAwAAAAwAAAAA
AAAAAAyyAAwACgADAAAACVVWVVVVVQAADL0ADwAKQ2EAAAAMAAAAAAAAAAAMvgAQAAwAAwAA
AAwAAAAAAAAAAAzYAA8ACkNhAAAADAAAAAAAAAAADOsADAAKAAMAAAAJVVZVVVVVAAANAQAP
AApDYQAAAAwAAAAAAAAAAA0GAAwACgADAAAACVVWVVVVVQAADQ0ADwAKQ2EAAAAMAAAAAAAA
AAANEwAMAAoAAwAAAAlVVlVVVVUAAA0XAA8ACkNhAAAADAAAAAAAAAAADRgAEAAMAAMAAAAM
AAAAAAAAAAANMAAMAAoAAwAAAAlVVlVVVVUAAA1GAA8ACkNhAAAADAAAAAAAAAAADUoADAAK
AAMAAAAJVVZVVVVVAAANUQAPAApDYQAAAAwAAAAAAAAAAA1oABAADAADAAAADAAAAAAAAAAA
DWoADAAKAAMAAAAJVVZVVVVVAAANgAAPAApDYQAAAAwAAAAAAAAAAA2EAAwACgADAAAACVVW
VVVVVQAADYsADAAIQ2EAAAAJVVZVVVVVAAANjQAPAApDYQAAAAwAAAAAAAAAAA2gAAwACgAD
AAAACVVWVVVVVQAADbYADwAKQ2EAAAAMAAAAAAAAAAANugAMAAoAAwAAAAlVVlVVVVUAAA3E
ABAADAAQAAAADAAAAAAAAAAADcUADwAKQ2EAAAAMAAAAAAAAAAANxgAMAAoAAwAAAAkAAQAB
AAEAAA3fABAADAAQAAAADAAAAAAAAAAADeEADAAKAAMAAAAJVVZVVVVVAAAOCQAMAAoAAwAA
AAkAADMzmZkAAA4PAAwACgADAAAACVVWVVVVVQAADhEADwAKQ2EAAAAMAAAAAAAAAAAORwAM
AAoAAwAAAAlVVlVVVVUAAA5bABAADAAQAAAADAAAAAAAAAAADl0ADAAKAAMAAAAJVVZVVVVV
AAAOcAAPAApDYQAAAAwAAAAAAAAAAA58ABAADAADAAAADAAAAAAAAAAADtMADwAKQ2EAAAAM
AAAAAAAAAAAO2wAQAAwAAwAAAAwAAAAAAAAAAA8BAA8ACkNhAAAADAAAAAAAAAAADwkAEAAM
AAMAAAAMAAAAAAAAAAAPMQAPAApDYQAAAAwAAAAAAAAAAA82ABAADAADAAAADAAAAAAAAAAA
D3kADAAKAAMAAAAJVVZVVVVVAAAPggAQAAwAEAAAAAwAAAAAAAAAAA+EAA8ACkNhAAAADAAA
AAAAAAAAD+wADAAKAAMAAAAJVVZVVVVVAAAP8AAQAAwAEAAAAAwAAAAAAAAAAA/yAAwACgAD
AAAACSIVYa8vUQAAD/kAEAAMABAAAAAMAAAAAAAAAAAP/AAMAAoAAwAAAAkAAQABAAEAABAV
ABAADAAQAAAADAAAAAAAAAAAEBYADAAKAAMAAAAJVVZVVVVVAAAQZQAQAAwAEAAAAAwAAAAA
AAAAABBmABAADAfSAAAADAAAAAAAAAAAEIgADAAKAAMAAAAJVVZVVVVVAAAQlgAMAAoAAwAA
AAkAADMzAAAAABCcAAwACgADAAAACVVWVVVVVQAAEJ4ACwAJAAQAAAAJAAAAAAAAAAAQnwAN
AAo6uAAAAAoAAAAAAAAAABCyAAwACgADAAAACVVWVVVVVQAAELkADAAKQxIAAAAMAAAAAAAA
AAAQugAMAAoAAwAAAAlVVlVVVVUAABDCABAADAAQAAAADAAAAAAAAAAAEMMADAAKAAMAAAAJ
VVZVVVVVAAAQygAQAAwAEAAAAAwAAAAAAAAAABEUABAADAAQAAAADAAAAAAAAAAAAAAAAAAC
AAIAAAAEAAAJagAAAQAAABiwAAAXsAAAAG4PZhyYB/YAAAAcAG4AA3N0eWwAAAAic291cAAA
AC5Nb0RFAAAAOlNpWkUAAABGAID//wAAAAAPb12wAID//wAAF54PcWTYAID//wAAF6IPbz2c
AID//wAAF6gPb120
--B_3176293913_1316759
Content-type: text/plain; name="registrationvalid.html";
x-mac-creator="4A795773";
x-mac-type="54455854"
Content-disposition: attachment
Content-transfer-encoding: base64
DQ08IS0tIEZpbGU6IHJlZ2lzdHJhdGlvbnZhbGlkLmh0bWwNDTxIVE1MPjxoZWFkPg0NPFRJ
VExFPlJlZ2lzdHJhdGlvbiBGb3JtPC9USVRMRT4NDTxzdHlsZSB0eXBlID0gInRleHQvY3Nz
Ij4NPCEgLS0NYm9keSB7bGluZS1oZWlnaHQ6IDE1MCV9DS0tID4NPC9TVFlMRT4NDTwvaGVh
ZD4NDTxib2R5Pg0NPFA+PEZPTlQgc2l6ZT02IENPTE9SPSIjMDA2NjAwIj48U1RST05HPlJl
Z2lzdHJhdGlvbiBGb3JtPC9TVFJPTkc+PC9GT05UPjxCUj48QlI+DQ1QcmVmZXJlZCBJRDog
PElOUFVUIE5BTUU9InJlcXVpcmVkbmFtZSIgVFlQRT0idGV4dCIgU0laRT0iMjAiIE1BWExF
TkdUSD0iMjAiPjxwPg08IS0tIA1SZXN0cmljdGlvbnM6DSgxKSBtaW5pbXVtIDYgYW5kIG1h
eGltdW0gOCBsb3dlciBjYXNlICJhLXoiIGFuZCAiMC05IiANKDIpIEZpZWxkIG5vdCBlbXB0
eS4gDS0tPg0NUHJlZmVyZWQgUGFzc3dvcmQ6IDxJTlBVVCBOQU1FPSJwd2QxIiBUWVBFPSJw
YXNzd29yZCIgU0laRT0iMjAiIE1BWExFTkdUSD0iMjAiPjxicj4NSW5wdXQgUGFzc3dvcmQg
YWdhaW46IDxJTlBVVCBOQU1FPSJwd2QyIiBUWVBFPSJwYXNzd29yZCIgICBTSVpFPSIyMCIg
TUFYTEVOR1RIPSIyMCI+PHA+DTwhLS0gDVJlc3RyaWN0aW9uczogDSgxKSBSZXN0cmljdGVk
IHRvIG1pbmltdW0gOCBhbmQgbWF4aW11bSAxMiBsb3dlciBjYXNlICJhLXoiIGFuZCAiMC05
Ig0oMikgInB3ZDEiICYgInB3ZDIiIGV4YWN0IG1hdGNoDSgzKSBGaWVsZHMgbm90IGVtcHR5
IA0tLT4NDU9wdGlvbnM6IDxTRUxFQ1QgTkFNRT0iZ3JvdXBzIiBTSVpFPSIxIj4NPE9QVElP
TiBTRUxFQ1RFRD5BPC9PUFRJT04+DTxPUFRJT04+QjwvT1BUSU9OPg08T1BUSU9OPkErQjwv
T1BUSU9OPg08L1NFTEVDVD48L1A+DTwhLS0gDVJlc3RyaWN0aW9uIDogDSgxKSBGaWVsZCBu
b3QgZW1wdHkgDS0tPg0NDTxCPkNvbnRhY3QgaW5mbzo8L0I+PGJyPg1FLW1haWwgKDEpIDog
PElOUFVUIE5BTUU9ImVtYWlsMSIgVFlQRT0idGV4dCIgU0laRT0iNDAiIE1BWExFTkdUSD0i
NDAiPjxicj4NRS1tYWlsICgyKSA6IDxJTlBVVCBOQU1FPSJlbWFpbDIiIFRZUEU9InRleHQi
IFNJWkU9IjQwIiBNQVhMRU5HVEg9IjQwIj48YnI+DUlDUSA6IDxJTlBVVCBOQU1FPSJpY3Fu
byIgVFlQRT0idGV4dCIgU0laRT0iMjQiIE1BWExFTkdUSD0iMjQiPHA+DTwhLS0gDVJlc3Ry
aWN0aW9ucyA6IA0oMSkgImVtYWlsIjEgbm90IGVtcHR5DSgyKSAiZW1haWwxIiAmICJlbWFp
bDIiIGluIHZhbGlkIGVtYWlsIGZvcm1hdA0oMykgRmllbGQgbm90IGVtcHR5IA0tLT4NDUJh
bmsgOiA8SU5QVVQgTkFNRT0iYmFuayIgVFlQRT0idGV4dCIgU0laRT0iMzAiIE1BWExFTkdU
SD0iMzAiPjxicj4NQS9DIG5hbWUgOiA8SU5QVVQgTkFNRT0iYWNuYW1lIiBUWVBFPSJ0ZXh0
IiBTSVpFPSI0MCIgTUFYTEVOR1RIPSI0MCI+PGJyPg1BL0MgbnVtYmVyIDogPElOUFVUIE5B
TUU9ImFjbm8iIFRZUEU9InRleHQiIFNJWkU9IjI0IiBNQVhMRU5HVEg9IjI0Ij48cD4NPCEt
LSANUmVzdHJpY3Rpb25zIDogDSgxKSAiYWNuYW1lIiBpbiBFbmdsaXNoIG9ubHkgIkEtWiIg
JiAiYS16Ig0oMikgImJhbmsiLCAiYWNuYW1lIiBhbmQgImFjbm8iIG5vdCBlbXB0eS4NLS0+
DTxIUj4NDTxQPg08U1RST05HPjxGT05UIFNJWkU9IjQiPkFza2luZyBmb3IgaGVscCAhPC9G
T05UPjwvU1RST05HPjxicj4NSSBhbSB1c2luZyBNYWNpbnRvc2ggT1M5ICYgSUU1Ljxicj4N
SSBuZWVkIGEgSmF2YXNjcmlwdCB2YWxpZGF0aW5nIHRoZSBhYm92ZSBlbnRyaWVzLiBJIGhh
dmUgdHJpZWQgc29tZSBkb3dubG9hZCBzY3JpcHRzIGJ1dCBkaWRuJ3Qgd29yay4gPFA+DQ0N
DTxCPjxJPk1vcmUgTmVlZHMgOjxQPg08L1A+KGkpIHRocmVlIEJ1dHRvbnMgOjwvST48L0I+
PEJSPg0oMSkgIFtTdWJtaXRdIC0tIFNlbmQgQUxMIGlucHV0IGZpZWxkIGRhdGEgdG8gYW4g
ZW1haWwgYWRkcmVzcy48QlI+DSgyKSAgW1Jlc2V0XSAtLSBSZXNldCBhbGwgaW5wdXQgZmll
bGRzIGludG8gYmxhbmsuPEJSPg0oMykgIFtRdWl0XSAtLSBnbyB0byBhIHNwZWNpZmljIHdl
YiBwYWdlLjxwPg0NPEI+PEk+KGlpKSBNZW1iZXIgcGFzc3dvcmQgZGF0YWJhc2UgJiBDR0kg
c2NyaXB0IDo8L0k+PC9CPjxCUj4NSSB3aWxsIGhhdmUgc29tZSBwYWdlcyB3aXRoIGxpbWl0
ZWQgYWNjZXNzIHRvIHJlZ2lzdGVyZWQgbWVtYmVycy48YnI+DUkgbmVlZCB2ZXJ5IHNpbXBs
ZSBhbmQgYmFzaWMgImxvZ2luIiBzY3JpcHQgYWNjZXNzaW5nIGEgSUQrcGFzc3dvcmQgZGF0
YWJhc2UuPEJSPg1QbGVhc2UgYWxzbyB0ZWxsIG1lIGhvdyB0byBjcmVhdGUgYW5kIG1hbmFn
ZSBzdWNoIGRhdGFiYXNlIGZpbGUuPEJSPjxCUj4NQW55IGhlbHAgYW5kIGFkdmlzZSBhcmUg
YXBwcmVjaWF0ZWQuDQ0NDQ0NPC9CT0RZPg08L0hUTUw+DQ==
--B_3176293913_1316759--
--B_3176295249_1373888--
------------------------------
Date: 28 Aug 2004 20:53:09 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: pass 2d array to C function
Message-Id: <cgqrbl$gig$1@mamenchi.zrz.TU-Berlin.DE>
min <minsanco@gmail.com> wrote in comp.lang.perl.misc:
> I need to call a C function from perl. How do I pass a 2D array into
> the C function that I am invoking from perl? Can anyone direct me to
> a tutorial?
These are the basics, the last one is a tutorial:
perlxs
perlapi
perlguts
perlXStut
If you intend to use Inline, there are particularly helpful ones. You
*may* get away with these with little reference to the above.
Inline # as far as needed (not much)
Inline::C # as far as needed (a lot)
Inline::C-Cookbook # start here
Anno
------------------------------
Date: Sat, 28 Aug 2004 13:22:27 -0700
From: "Mark" <nospam@thanksanyway.org>
Subject: Re: Resizing JPG images with Perl?
Message-Id: <zK2dnZditIXhdK3cRVn-pQ@speakeasy.net>
"Chris Cole" <ithinkiam@gmail.com> wrote:
> gnu gcc is the default C compiler which most 'freeware' software is
> written for. However, imagemagick is available for windows precompiled and
> should work with the Image::magick module.
>
> http://www.imagemagick.org/www/download.html
>
Thanks! The binary installed fine, and I'm able to create the thumbnails
that I need from a command window, so no need to automate anything
with Perl. :-|
-Mark
------------------------------
Date: Sat, 28 Aug 2004 21:39:43 GMT
From: Joe Smith <Joe.Smith@inwap.com>
Subject: Re: testing without shell access
Message-Id: <zY6Yc.77483$Fg5.38144@attbi_s53>
Patrice Auffret wrote:
>>>You should always, yes *always*, check the return value from open():
>>> open (STDERR, '>scriptErr.txt') or die "could not open 'scriptErr.txt' $!";
>
> What is the problem with the first die error message ? Shouldn't it be
> better to understand the problem by simply reading `$!' (and not by
> trying to guess by hand what the problem may be) ?
The point I was trying to make is that die() sends its result to STDERR.
If the open for STDERR failed, and if perl did not reset it back to
its original state, when text written to STDERR would not be seen.
I've been informed that perl does reset STDERR in this case, so
my objection is irrelevant.
-Joe
------------------------------
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 6926
***************************************
