Peter Flanigan > CatalystX-Usul > CatalystX::Usul::TapeBackup

Download:
catalystx-usul/CatalystX-Usul-0.17.1.tar.gz

Dependencies

Annotate this POD

Website

CPAN RT

Open  0
View/Report Bugs
Module Version: v0.17.1   Source  

Name ^

CatalystX::Usul::TapeBackup - Provides tape device methods

Version ^

Describes v0.17.$Rev: 1 $

Synopsis ^

   use CatalystX::Usul::TapeBackup;
   use Class::Usul;

   my $attr     = { builder  => Class::Usul->new, };

   my $tape_obj = CatalystX::Usul::TapeBackup->new( $attr );

   my $status_hash_ref = $tape_obj->get_status( {} );

   my $ipc_response_obj = $tape_obj->start( $args, $paths );

   my $tape_device = $tape_obj->eject( { device => $tape_device } );

Description ^

Provides methods to perform tape backups using either dump or tar

Configuration and Environment ^

Defines the following attributes

dev_dir

Directory path which defaults to /dev

default_tape

String which defaults to st0

dump_cmd

String which defaults to /sbin/dump -aqu -b 128

dump_dates

Path which defaults to /etc/dumpdates

form

String which defaults to backup

locale

String which defaults to en_GB

max_wait

Integer which defaults to 43_200

mt_cmd

String which defaults to mt -f

no_rew_pref

String which defaults to n

no_rew_suff

String which defaults to null

pattern

String which defaults to st[0-9]+

tar_cmd

String which defaults to tar -c -b 256

Subroutines/Methods ^

eject

   $tape_device = $self->eject( { device => $tape_device } );

Ejects the tape in the selected drive

get_status

   $status_hash_ref = $self->get_status( $args );

Returns a hash ref of information about the selected tape device

process

   $display_message = $self->process( $options, $paths );

Called from a command line wrapper this method executes the actual dump or tar command

start

   $ipc_response_obj = $self->start( $args, $paths );

Calls the external command line wrapper which performs the backup. Runs the command asynchronously so that it can return immediately to the action that called it

Diagnostics ^

None

Dependencies ^

Class::Usul::File
Class::Usul::IPC
CatalystX::Usul::Moose
Class::Usul::Time
CatalystX::Usul::Constraints
TryCatch

Incompatibilities ^

There are no known incompatibilities in this module

Bugs and Limitations ^

There are no known bugs in this module. Please report problems to the address below. Patches are welcome

Author ^

Peter Flanigan, <Support at RoxSoft.co.uk>

License and Copyright ^

Copyright (c) 2014 Peter Flanigan. All rights reserved

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See perlartistic

This program is distributed in the hope that it will be useful, but WITHOUT WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE

syntax highlighting: