Kenichi Ishigaki > Games-Sudoku-Component-0.02 > Games::Sudoku::Component::Result

Download:
Games-Sudoku-Component-0.02.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 0.01   Source  

NAME ^

Games::Sudoku::Component::Result

SYNOPSIS ^

  use Games::Sudoku::Component::Result;

  # verbose
  my $verbose = 1;

  sub some_function {
    my $return_code = 1;

    if ($verbose) {
      return Games::Sudoku::Component::Result->new(
        result => $code,
        reason => 'more descriptive error message',
      );
    }
    else {
      return $code;
    }
  }

  # Then, check the result. 

  if (my $result = &some_function) {
    print ref $result ? $result->{reason} : 'something has happened';
  }

DESCRIPTION ^

This module is mainly for debugging. Use this for a normal scalar return code, and you can get more detailed or additional information about it.

METHODS ^

new (scalar or hash or hashref)

Options are:

result

Something you'd like to return.

reason

Debug message, error code, or something like that.

If there is only one argument, it is supposed to be a result code.

result

reason

Returns the values stored when the object was created, respectively.

AUTHOR ^

Kenichi Ishigaki, <ishigaki@cpan.org>

COPYRIGHT AND LICENSE ^

Copyright (C) 2006 by Kenichi Ishigaki

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

syntax highlighting: