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 / OS.pm < prev    next >
Encoding:
Perl POD Document  |  2004-09-23  |  2.1 KB  |  134 lines
  1. # 
  2. # /*
  3. #  * *********** WARNING **************
  4. #  * This file generated by ModPerl::WrapXS/0.01
  5. #  * Any changes made here will be lost
  6. #  * ***********************************
  7. #  * 01: lib/ModPerl/Code.pm:701
  8. #  * 02: O:\147xampp\sources\mod_perl-1.99_16\blib\lib/ModPerl/WrapXS.pm:584
  9. #  * 03: O:\147xampp\sources\mod_perl-1.99_16\blib\lib/ModPerl/WrapXS.pm:1100
  10. #  * 04: Makefile.PL:335
  11. #  * 05: Makefile.PL:283
  12. #  * 06: Makefile.PL:51
  13. #  */
  14. # 
  15.  
  16.  
  17. package APR::OS;
  18.  
  19. use strict;
  20. use warnings FATAL => 'all';
  21.  
  22.  
  23. use APR ();
  24. use APR::XSLoader ();
  25. our $VERSION = '0.01';
  26. APR::XSLoader::load __PACKAGE__;
  27.  
  28.  
  29.  
  30. 1;
  31. __END__
  32.  
  33. =head1 NAME
  34.  
  35. APR::OS - Perl API for Platform-specific APR API
  36.  
  37.  
  38.  
  39.  
  40. =head1 Synopsis
  41.  
  42.   use APR::OS ();
  43.   
  44.   # get thread id
  45.   my $tid_obj = APR::OS::thread_current();
  46.   my $tid = $$tid_obj;
  47.  
  48.  
  49.  
  50.  
  51.  
  52. =head1 Description
  53.  
  54. C<APR::OS> provides the Perl interface to platform-specific APR API.
  55.  
  56. You should be extremely careful when relying on any of the API
  57. provided by this module, since they are no portable. So if you use
  58. those you application will be non-portable as well.
  59.  
  60.  
  61.  
  62.  
  63. =head1 API
  64.  
  65. C<APR::OS> provides the following methods:
  66.  
  67.  
  68.  
  69.  
  70.  
  71.  
  72.  
  73.  
  74.  
  75.  
  76. =head2 C<thread_current>
  77.  
  78. Get the thread ID
  79.  
  80.   $tid_obj = APR::OS::thread_current();
  81.  
  82. =over 4
  83.  
  84. =item ret: C<$tid_obj> ( C<APR::OS::Thread> object )
  85.  
  86. To get the thread id dereference it: C<$$tid_obj>.
  87.  
  88. That value is a thread ID under threaded MPMs, otherwise 0.
  89.  
  90. =item since: 1.99_12
  91.  
  92. =back
  93.  
  94. Example:
  95.  
  96.     use Apache::MPM ();
  97.     use APR::OS ();
  98.     if (Apache::MPM->is_threaded) {
  99.         my $tid_obj = APR::OS::thread_current();
  100.         print "TID: $$tid_obj";
  101.     }
  102.     else {
  103.         print "PID: $$";
  104.     }
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112. =head1 See Also
  113.  
  114. L<mod_perl 2.0 documentation|docs::2.0::index>.
  115.  
  116.  
  117.  
  118.  
  119. =head1 Copyright
  120.  
  121. mod_perl 2.0 and its core modules are copyrighted under
  122. The Apache Software License, Version 2.0.
  123.  
  124.  
  125.  
  126.  
  127. =head1 Authors
  128.  
  129. L<The mod_perl development team and numerous
  130. contributors|about::contributors::people>.
  131.  
  132. =cut
  133.  
  134.