ARSperl
view release on metacpan or search on metacpan
again, need the control structure when we are cleaning up (to release licenses,
etc). So, the functionality of this routine is now rolled into ars_Logoff().
This means that if you don't call ars_Logoff when your script completes (or
when it prematurely exits) you might not release your license. This shouldn't
affect too many things, but is something to keep in mind. You might want to
place END{} clauses in your scripts that can call ars_Logoff() if/when your
script(s) die().
Also note that, as of v4.0, the ARS API is now multithreaded. This means that
you must linking the POSIX threads library when compiling ARSperl. I have
not determined what impact this has under Windows NT. I would guess none since NT
is normally a threaded environment - you probably get the appropriate thread
routines either way.
1.6 Notes
---------
The 1.6 release marks the first real NT port. v1.5x attempted a port
to Active State's Perl for Windows, but wasn't successful. Bill Middleton
re-worked the source code and merged it into Gurusamy Sarathy's
version of perl for windows.
if ($curargs{$1}) {
$new .= "ord('\$$1')";
} else {
$new .= "ord('$1')";
}
next;
};
# replace "sizeof(foo)" with "{foo}"
# also, remove * (C dereference operator) to avoid perl syntax
# problems. Where the %sizeof array comes from is anyone's
# guess (c2ph?), but this at least avoids fatal syntax errors.
# Behavior is undefined if sizeof() delimiters are unbalanced.
# This code was modified to able to handle constructs like this:
# sizeof(*(p)), which appear in the HP-UX 10.01 header files.
s/^sizeof\s*\(// && do {
$new .= '$sizeof';
my $lvl = 1; # already saw one open paren
# tack { on the front, and skip it in the loop
$_ = "{" . "$_";
my $index = 1;
# find balanced closing paren
( run in 0.513 second using v1.01-cache-2.11-cpan-702932259ff )