home *** CD-ROM | disk | FTP | other *** search
/ PC Professionell 2004 December / PCpro_2004_12.ISO / files / webserver / xampp / xampp-perl-addon-1.4.9-installer.exe / APR.pm < prev    next >
Encoding:
Perl POD Document  |  2004-09-17  |  2.1 KB  |  102 lines
  1. # Copyright 2001-2004 The Apache Software Foundation
  2. #
  3. # Licensed under the Apache License, Version 2.0 (the "License");
  4. # you may not use this file except in compliance with the License.
  5. # You may obtain a copy of the License at
  6. #
  7. #     http://www.apache.org/licenses/LICENSE-2.0
  8. #
  9. # Unless required by applicable law or agreed to in writing, software
  10. # distributed under the License is distributed on an "AS IS" BASIS,
  11. # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  12. # See the License for the specific language governing permissions and
  13. # limitations under the License.
  14. #
  15. package APR;
  16.  
  17. use DynaLoader ();
  18. our $VERSION = '0.01';
  19. our @ISA = qw(DynaLoader);
  20.  
  21. #dlopen("APR.so", RTDL_GLOBAL); so we only need to link libapr.a once
  22. # XXX: see xs/ModPerl/Const/Const.pm for issues of using 0x01
  23. use Config ();
  24. use constant DL_GLOBAL =>
  25.   ( $Config::Config{dlsrc} eq 'dl_dlopen.xs' && $^O ne 'openbsd' ) ? 0x01 : 0x0;
  26. sub dl_load_flags { DL_GLOBAL }
  27.  
  28. unless (defined &APR::XSLoader::BOOTSTRAP) {
  29.     __PACKAGE__->bootstrap($VERSION);
  30.     *APR::XSLoader::BOOTSTRAP = sub () { 1 };
  31. }
  32.  
  33. 1;
  34. __END__
  35.  
  36. =head1 NAME
  37.  
  38. APR - Perl Interface for Apache Portable Runtime (libapr and
  39. libaprutil Libraries)
  40.  
  41.  
  42.  
  43.  
  44.  
  45. =head1 Synopsis
  46.  
  47.   use APR ();
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54. =head1 Description
  55.  
  56. On load this modules prepares the APR enviroment (initializes memory
  57. pools, data structures, etc.)
  58.  
  59. You don't need to use this module explicitly, since it's already
  60. loaded internally by all C<APR::*> modules.
  61.  
  62.  
  63.  
  64.  
  65.  
  66.  
  67. =head1 Using APR modules outside mod_perl 2.0
  68.  
  69. You'd use the C<APR::*> modules outside mod_perl 2.0, just like you'd
  70. use it with mod_perl 2.0. For example to get a random unique string
  71. you could call:
  72.  
  73.   % perl -MApache2 -MAPR::UUID -le 'print APR::UUID->new->format'
  74.  
  75.  
  76.  
  77.  
  78.  
  79.  
  80. =head1 See Also
  81.  
  82. L<mod_perl 2.0 documentation|docs::2.0::index>.
  83.  
  84.  
  85.  
  86.  
  87. =head1 Copyright
  88.  
  89. mod_perl 2.0 and its core modules are copyrighted under
  90. The Apache Software License, Version 2.0.
  91.  
  92.  
  93.  
  94.  
  95. =head1 Authors
  96.  
  97. L<The mod_perl development team and numerous
  98. contributors|about::contributors::people>.
  99.  
  100.  
  101. =cut
  102.