Exception::System

Exception::System is the exception class for system or library calls.
Download

Exception::System Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Piotr Roszatycki
  • Publisher web site:
  • http://search.cpan.org/~dexter/MooseX-GlobRef-Object-0.02/lib/MooseX/GlobRef/Object.pm

Exception::System Tags


Exception::System Description

Exception::System is the exception class for system or library calls. Exception::System is the exception class for system or library calls.SYNOPSIS # Loaded automatically if used as Exception::Base's argument use Exception::Base 'Exception::System', 'Exception::File' => { isa => 'Exception::System' }; try Exception::Base eval { my $file = "/notfound"; open FILE, $file or throw Exception::File message=>"Can not open file: $file", file=>$file; }; if (catch Exception::System my $e) { if ($e->isa('Exception::File')) { warn "File error:".$e->{errstr}; } if ($e->with(errname=>'ENOENT')) { warn "Catched not found error"; } }This class extends standard Exception::Base with handling system or library errors. The additional fields of the exception object are filled on throw and contain the error message and error codes.FIELDSClass fields are implemented as values of blessed hash.errstr (ro)Contains the system error string fetched at exception throw. It is the part of the string representing the exception object. It is the same as $! variable in string context. eval { throw Exception::System message=>"Message"; }; catch Exception::System my $e and print $e->{errstr};errstros (ro)Contains the extended system error string fetched at exception throw. It is the same as $^E variable. eval { throw Exception::System message=>"Message"; }; catch Exception::System my $e and $e->{errstros} ne $e->{errstr} and print $e->{errstros};errno (ro)Contains the system error number fetched at exception throw. It is the same as $! variable in numeric context. eval { throw Exception::System message=>"Message"; };errname (ro)Contains the system error constant from the system error.h include file. eval { throw Exception::System message=>"Message"; }; catch Exception::System my $e and $e->{errname} eq 'ENOENT' and $e->throw;METHODSstringify(])Returns the string representation of exception object. The format of output is "message: error string". eval { open F, "/notexisting"; throw Exception::System; }; print $@->stringify(1); print "$@"; Requirements: · Perl · Exception::Base >= 0.03


Exception::System Related Software