Help for this page

Select Code to Download


  1. or download this
    package U2D::TestSharing;
    
    ...
    }
    
    1;
    
  2. or download this
    <IfModule mpm_worker_module>
        StartServers          1 
    ...
        ServerLimit           1
        PerlInterpMax         1
    </IfModule>
    
  3. or download this
    <Location /testSharing>
        SetHandler perl-script
        PerlResponseHandler U2D::TestSharing
    </Location>
    
  4. or download this
    02-08-2011 07:42:27:552 2669-3063479152: Waiting for lock.
    02-08-2011 07:42:27:565 2669-3063479152: Acquired lock.
    ...
    02-08-2011 07:42:27:594 2669-3013122928: Initializing fruits.
    02-08-2011 07:42:27:594 2669-3013122928: Releasing lock.
    02-08-2011 07:42:27:594 2669-3013122928: I like to eat apple, banana, 
    +peach.
    
  5. or download this
    use strict;
    use warnings FATAL => 'all';
    ...
    use U2D::TestSharing ();
    
    1;