PNG  IHDR;IDATxܻn0K )(pA 7LeG{ §㻢|ذaÆ 6lذaÆ 6lذaÆ 6lom$^yذag5bÆ 6lذaÆ 6lذa{ 6lذaÆ `}HFkm,mӪôô! x|'ܢ˟;E:9&ᶒ}{v]n&6 h_tڠ͵-ҫZ;Z$.Pkž)!o>}leQfJTu іچ\X=8Rن4`Vwl>nG^is"ms$ui?wbs[m6K4O.4%/bC%t Mז -lG6mrz2s%9s@-k9=)kB5\+͂Zsٲ Rn~GRC wIcIn7jJhۛNCS|j08yiHKֶۛkɈ+;SzL/F*\Ԕ#"5m2[S=gnaPeғL lذaÆ 6l^ḵaÆ 6lذaÆ 6lذa; _ذaÆ 6lذaÆ 6lذaÆ RIENDB` package Net::OpenSSH::Constants; our $VERSION = '0.51_07'; use strict; use warnings; use Carp; require Exporter; our @ISA = qw(Exporter); our %EXPORT_TAGS = (error => []); my %error = ( OSSH_MASTER_FAILED => 1, OSSH_SLAVE_FAILED => 2, OSSH_SLAVE_PIPE_FAILED => 3, OSSH_SLAVE_TIMEOUT => 4, OSSH_SLAVE_CMD_FAILED => 5, OSSH_SLAVE_SFTP_FAILED => 6, OSSH_ENCODING_ERROR => 7 ); for my $key (keys %error) { no strict 'refs'; my $value = $error{$key}; *{$key} = sub () { $value }; push @{$EXPORT_TAGS{error}}, $key } our @EXPORT_OK = map { @{$EXPORT_TAGS{$_}} } keys %EXPORT_TAGS; $EXPORT_TAGS{all} = [@EXPORT_OK]; 1; __END__ =head1 NAME Net::OpenSSH::Constants - Constant definitions for Net::OpenSSH =head1 SYNOPSIS use Net::OpenSSH::Constants qw(:error); =head1 DESCRIPTION This module exports the following constants: =over 4 =item :error OSSH_MASTER_FAILED - some error related to the master SSH connection happened OSSH_SLAVE_FAILED - some error related to a slave SSH connection happened OSSH_SLAVE_PIPE_FAILED - unable to create pipe to communicate with slave process OSSH_SLAVE_TIMEOUT - slave process timeout OSSH_SLAVE_CMD_FAILED - child process exited with a non zero status OSSH_SLAVE_SFTP_FAILED - creation of SFTP client failed OSS_ENCODING_ERROR - some error related to the encoding/decoding of strings happened =back =head1 COPYRIGHT AND LICENSE Copyright (C) 2008, 2009 by Salvador FandiEo (sfandino@yahoo.com) This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.10.0 or, at your option, any later version of Perl 5 you may have available. =cut