5 require UNIVERSAL::require;
11 OpenSRF - Top level class for OpenSRF perl modules.
19 our $VERSION = "3.002_001";
25 This method is called by abstract methods to ensure that the process
26 dies when an undefined abstract method is called.
30 sub alert_abstract() {
32 my $class = ref( $c ) || $c;
33 my ($file, $line, $method) = (caller(1))[1..3];
34 die " * Call to abstract method $method at $file, line $line";
39 Returns the scalar value of its caller.
43 sub class { return scalar(caller); }
45 =head2 OSRF_APACHE_REQUEST_OBJ
47 Gets and sets the Apache request object when running inside mod_perl.
48 This allows other parts of OpenSRF to investigate the state of the
49 remote connection, such as whether the client has disconnected, and
55 sub OSRF_APACHE_REQUEST_OBJ {