Symlink.pm 189 B

123456789101112
  1. package NIC::Formats::NICTar::Symlink;
  2. use parent NIC::NICBase::Symlink;
  3. use strict;
  4. sub tarfile {
  5. my $self = shift;
  6. if(@_) { $self->{TARFILE} = shift; }
  7. return $self->{TARFILE};
  8. }
  9. 1;