1# 2# (c) Jan Gehring <jan.gehring@gmail.com> 3# 4# vim: set ts=2 sw=2 tw=0: 5# vim: set expandtab: 6 7package Rex::User::Base; 8 9use 5.010001; 10use strict; 11use warnings; 12 13our $VERSION = '1.13.4'; # VERSION 14 15sub new { 16 my $that = shift; 17 my $proto = ref($that) || $that; 18 my $self = {@_}; 19 20 bless( $self, $proto ); 21 22 return $self; 23} 24 25sub lock_password { 26 27 # Overridden in those classes that implement it 28 die "lock_password is not available on this operating system"; 29} 30 31sub unlock_password { 32 33 # Overridden in those classes that implement it 34 die "unlock_password is not available on this operating system"; 35} 36 371; 38