APR::OS - Perl API for Platform-specific APR API
use APR::OS (); # get current thread id my $tid = APR::OS::current_thread_id();
APR::OS
provides the Perl interface to platform-specific APR API.
You should be extremely careful when relying on any of the API provided by this module, since they are no portable. So if you use those you application will be non-portable as well.
APR::OS
provides the following methods:
current_thread_id
Get the current thread ID
$tid = APR::OS::current_thread_id();
$tid
( integer )
Example:
use Apache2::MPM (); use APR::OS (); if (Apache2::MPM->is_threaded) { my $tid_obj = APR::OS::current_thread_id(); print "TID: $tid"; } else { print "PID: $$"; }
mod_perl 2.0 and its core modules are copyrighted under The Apache Software License, Version 2.0.