5 require UNIVERSAL::require;
11 OpenSRF - Top level class for OpenSRF perl modules.
19 our $VERSION = "2.12";
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); }