26 lines
357 B
Perl
26 lines
357 B
Perl
package File::HomeDir::Driver;
|
|
|
|
# Abstract base class that provides no functionality,
|
|
# but confirms the class is a File::HomeDir driver class.
|
|
|
|
use 5.008003;
|
|
use strict;
|
|
use warnings;
|
|
use Carp ();
|
|
|
|
use vars qw{$VERSION};
|
|
|
|
BEGIN
|
|
{
|
|
$VERSION = '1.006';
|
|
}
|
|
|
|
sub my_home
|
|
{
|
|
Carp::croak("$_[0] does not implement compulsory method $_[1]");
|
|
}
|
|
|
|
1;
|
|
|
|
#line 61
|