=head1 VERSION
-Version 1.12
+Version 1.17
=cut
-our $VERSION = '1.12';
+our $VERSION = '1.17';
=head1 DESCRIPTION
or $_[0]->_croak('open(' . fileno($_[1]) . ", '$_[2]&', $fd): $!");
}
-=head2 C<save_fh $from, $mode [, $to ]>
+=head2 C<save_fh>
+
+ $tva->save_fh($from, $mode);
+ $tva->save_fh($from, $mode, $to);
Save the original filehandle C<$from> opened with mode C<$mode>, and redirect it to C<$to> if it's defined or to F</dev/null> otherwise.
=head2 C<restore_all_fh>
+ $tva->restore_all_fh;
+
Restore all the filehandles that were saved with L</save_fh> to their original state.
The redirections aren't closed.
=head1 COPYRIGHT & LICENSE
-Copyright 2009,2010 Vincent Pit, all rights reserved.
+Copyright 2009,2010,2011,2013,2015 Vincent Pit, all rights reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.