VMS::FlatFile

Read and write hashes with VMS::IndexedFile
Download

VMS::FlatFile Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Thomas Pfau
  • Publisher web site:
  • http://nbpfaus.net/~pfau/ftplib/

VMS::FlatFile Tags


VMS::FlatFile Description

Read and write hashes with VMS::IndexedFile VMS::FlatFile is a Perl module to read and write hashes with VMS::IndexedFile.SYNOPSISStandalone # Load the module use VMS::FlatFile; # Create an instance # args - file name, access (ro=0, rw=1), format, key number my $file = new VMS::FlatFile 'disk$user01:file.dat', 0, , 0; # Read a hash my $hashref = $file->get($key); # Write a hash my $sts = $file->put($hashref); # Delete a record $sts = $file->delete($key);As a Base Class # name your derived class package MyFile; # Load the module and derive use VMS::FlatFile; use var qw(@ISA); @ISA = qw(VMS::FlatFile); 1; # override new sub new { my $class = shift; my $self = {}; bless $self,$class; # default to read only my $access = shift || 0; # use key 0 my $krf = shift || 0; $self->_initialize('disk:filename.type', $access, , $krf); return $self; } package main; # create an instance my $file = new MyFile; my $hashref = $file->get('keyvalue'); Requirements: · Perl


VMS::FlatFile Related Software