File Coverage

lib/Rex/Interface/File/Base.pm

Criterion	Covered	Total	%
statement	10	15	66.6
branch			n/a
condition	1	3	33.3
subroutine	3	8	37.5
pod	0	6	0.0
total	14	32	43.7

#
# (c) Jan Gehring
#

package Rex::Interface::File::Base;

use v5.12.5;
use warnings;

our $VERSION = '1.14.2.2'; # TRIAL VERSION

sub new {
  my $that  = shift;
  my $proto = ref($that) || $that;
  my $self  = {@_};

  bless( $self, $proto );

  return $self;
}

sub open  { die("Must be implemented by Interface Class."); }
sub read  { die("Must be implemented by Interface Class."); }
sub write { die("Must be implemented by Interface Class."); }
sub close { die("Must be implemented by Interface Class."); }
sub seek  { die("Must be implemented by Interface Class."); }

1;