package Continuity::Suspender; use strict; use Data::Dumper; =head1 NAME Continuity::Suspender - an abstract wrapper around various object suspendors =head1 DESCRIPTION You give it a single object, it snapshots and restores it. =cut sub new { my ($class) = @_; my $self = {}; bless $self; return $self; } 1;